excel的工作表名称随着文件名变化

作者&投稿:用磊 (若有异议请与网页底部的电邮联系)
excel的工作表名称随着文件名变化~

可在workbook_open事件中写入代码,即可实现打开Excel就运行VBA。步骤如下:
0、按Alt+F11,打开VBA编辑器
1、点击“Thisworkbook”进入程序编辑界面,点击下拉箭头,选择“Workbook”
2、此时,系统会自动出现一段代码,即打开文件执行其中的程序
3、在中间行加入代码,如下图所示:
Sheets(3).Name = ActiveWorkbook.Name
4、保存,关闭。
5、每次打开这个文件即可 将第三个工作表的标签名改为与文件名相同的内容。
测试通过。

这个 一定是 用vba 代码来实现的!
只不过 它不是存在在 你所说的 通常情况下的“模块”中,而是存在在 工作簿 工程内置的模块中 比如 你的这个工作表 中 或者是 thisworkbook 这个模块中……
你可以 通过vbe 窗口 来检查一下:打开 vbe 窗口 在左边的工程窗口总 双击 thisworkbook 看看 一定有代码存在……

祝你快乐!

设置方法如下:

  1. 在单元格中输入“=MID(CELL("filename"),FIND("[",CELL("filename"))+1,FIND("]",CELL("filename"))-FIND("[",CELL("filename"))-1)”回车即可得到文件名。

  2. 如果此时改变文件名,则此处的名称也改变。



按下ALT+F11,双击左边工程框中的"THISWORKBOOK",然后复制下面代码到右边代码框中.退出.

保存文件退出.然后重命名文件,再次打开,看看结果.

Private Sub Workbook_Open()
Sheets(1).Name = Replace(ThisWorkbook.Name, ".xls", "")
End Sub

我也想知道

是用宏里面的caption属性设置的吧你可以打开宏看看


excel里的sheet叫什么
如下:sheet 英[ʃi:t] 美[ʃit]n. 纸; 被单; 一张(通常指标准尺寸的纸); 一大片(覆盖物); 表格;1、在EXCEL中,一个sheet代表一个工作表,多个sheet,就组成了一个工作簿。2、新建的EXCEL默认三个sheet.

excel怎样引用工作表名
在Excel中引用工作表名,而不直接展示表格或图片,通常涉及使用Excel的内置函数或公式来间接引用或显示工作表名。以下是一种常见的方法:方法一:使用CELL和文本函数组合 Excel中的`CELL`函数可以用来获取单元格的信息,包括文件路径和工作表名。结合`RIGHT`、`LEN`和`FIND`等文本函数,可以从中提取出工作...

怎么快速提取一个excel文件中的所有工作表名
要快速提取Excel文件中的所有工作表名,首先打开文件,进入“公式”选项。在“定义名称”对话框中,输入“sheet”,清除原有的内容。接下来,复制公式“=REPLACE(GET.WORKBOOK(1),1,FIND("],GET.WORKBOOK(1)),)T(NOW())”并粘贴到对话框2,确认操作。重复此过程,这次在“定义名称”对话框中输入...

如何在excel文件中,引用工作表名(可变)?
首先,打开你的MicrosoftOfficeExcel2016版本,点击你所需的Excel表格文件进行操作。在工作表的界面,确保你想要显示其他工作表内容的单元格已经显示出数据。接着,选择你想要显示工作表名称的单元格,比如A1。在输入框中,直接键入你想要引用的工作表名,例如"Sheet2"。然后,切换到公式栏,这是关键步骤,...

Excel怎么提取工作表名称?
1.一步搞定之代码 Sub 提取所有工作表名称()for x=1 to sheets.count cells(x,1)=sheets(x).name next x End Sub 如图,按照顺序来就可以啦。方法\/步骤 1.分步阅读 首先我们打开一个工作样表作为例子。2.工作表标签名即是工作表的名称,在指定激活当前工作表时,可以使用worksheets(“工作表...

Excel中如何快速获取全部工作表的名称
一个工作簿中有的时候会有很多工作表,我们如何快速获取所有工作表的名称并列出清单呢?手动输入是一个方法,但在工作簿有多工作表时,就会是个麻烦事了。定义名称“获取表名”,在“插入”菜单下点击“名称”下的“定义”名称定义为get ,大家自己随便设置,在下方输入函数“=get.workbook(1)”在单元...

怎样在Excel中提取工作表的名称
首先,确保当前工作簿已经保存。若未保存,可以按下组合快捷键Ctrl+S进行保存。其次,在单元格中输入公式=CELL("filename"),如下图所示 从步骤2中的公式结果可以看出当前单元格所在的工作表的名称“Sheet1"已经包含在公式的结果中了,如下图所示 在A2单元格中输入公式=MID(A1,FIND("]",A1)+1,...

为何Excel表中的工作表名称自动改变?
在当前处于编辑状态的同一个工作簿中,建立数据的查找和引用关系后,当数据源的表名发生改变,比如Sheet1重命名为Sheet100,则所有与Sheet1建立了数据引用关系的,自动将Sheet1修改为Sheet100,不影响数据的正常引用。如果数据源为其他工作簿的工作表,且表名发生了变化,当打开工作簿时,Excel会自动提示...

excel的工作表名称是什么意思?不是excel表格的文件名称吧
你所说的工作表名称可能有二个意思,第一就是工作表本来的名称,如sheet1这样的名称,这就叫工作表名称,当然这个名称可以更改。第二就是自定义名称,为某区域定义一个名称,如你选中A1至A5后,在名称框输入数量,然后你在任意工作表中任意单元格中输入=sum(数量),就会出现A1至A5之后,名称的作用...

excel怎么引用工作表名
为了提取出工作表名,可以使用FIND函数找到"["的位置,再用MID函数截取其后的内容。例如,公式可以写为:=MID(CELL(filename,A1),FIND(],CELL(filename,A1))+1,99)。这里的99是预估的工作表名字符数,实际使用时可根据需要调整。总之,通过以上步骤,你可以准确地引用和提取Excel工作表的名称,无论...

湄潭县17586216932: 如何让excel中的某一单元格显示的内容随文件名的改变而改变 -
进栋恒迪: 先把你想要的内容填写在让excel中的第一单元格,然后在你想要和第一单元格里的字一样的另外第二格里输入:= 在用鼠标左键点击第一单元格,然后按Enter回车键即可. 注意:= (等于号)不能没有.另外第二格的内容是随着第一格的内容而改变的,所以要改只能改第一格,第二格是不能改的,改的话就没有公式了. 希望能帮到你!

湄潭县17586216932: 03版Excel为什么工作表名称会自动变成文件名,且只有一个工作表?如何批量更改回默认的sheet1,2,3? -
进栋恒迪: 答:检查如下3个目录里是否存有模板.如果有,移除该文件就行.XP系统:C:\Documents and Settings\用户名\Application Data\Microsoft\Excel\XLSTART C:\Program Files\Microsoft Office\Templates\1033 C:\Program Files\Microsoft Office\...

湄潭县17586216932: 为什么我建“新建 Microsoft Excel 工作表.xls”只要改名称就会变成“.xls~RFc0d461.TMP”的文档? -
进栋恒迪: 修改名称的时候,要注意不能改变后缀名,就是那个.xls,该名称时就改那个点的前面部分就可以了.

湄潭县17586216932: 在excel中不同一个工作表,修改excel名之后,怎样让那一个excel也跟着改变呢? -
进栋恒迪: 这个要看你的工作表数据是怎么来的.你可以看那个需要数据变动的工作表的数据格子,如果在公式那里有原来数据表的名字,把它改成你现在新取名的工作表就好了.如果不是公式取数的,你就需要看数据-导入外部数据-编辑查询里面.把你发现的原来工作表的名字改成新的.你试试,希望对你有帮助!

湄潭县17586216932: 最近有人给我一张EXCEL表,为什么我在其中的一个工作表进行操作,别的工作表都跟着有同样的改变呢?
进栋恒迪: 是不是在进行工作组操作啊,看看标题栏文件名称后有没有"[工作组]"字样,如果有,右点工作标签-取消工作组

湄潭县17586216932: Excel 工作表文件名后面忽然出现“冲突”. -
进栋恒迪: 1. 兼容模式,在作业时后台中修改了宏中资料,建议重新按装,所有资料不会丢失的.如果董宏的话,可以修改. 快捷键:Alt+F11 2. 删除单元格名() On Error Resume Next Dim l As Integer l = ActiveWorkbook.Names.Count For i = l To 1 ...

湄潭县17586216932: EXCEL工作表名和文件名一样吗? -
进栋恒迪: 工作表指的就是SHEET1,SHEET2...之类的. 工作表改名,就是改下面的标签名

湄潭县17586216932: excel 自动改文件名 -
进栋恒迪: excel 自动改文件名的方法如下:1、把这些代码复制到ThisWorkbook项目对象下:Private Sub Workbook_BeforeClose(Cancel As Boolean) A = Sheets("Sheet1").Range("A1") '假定工作表1的A1单元格.必需指定工作表名.B = ...

湄潭县17586216932: 为什么我的EXCEL工作表重命名后,名字前边总有文件名字的后几位加个.xls)啊
进栋恒迪: 你好,XLS是EXCEL的属性名称,如果你把XLS强行删除的话文件格式就改变了.最好是保留,更改名称的时候不要选中XLS就可以了

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 星空见康网