Question

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

有一个行业软件生成了一个excel文件，里面只有一个工作表。特别的是，当重命名文件名称后，里面工作表的名称也变成相应的名字。比如说，当把文件名改为A时，打开文件会发现工作表的名称也变为A。我想请教一下，这是如何实现的？

Answer 1

设置方法如下：

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

   

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

   

Answer 2

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

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

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

Answer 3

我也想知道

Answer 4

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