一个Excel文件、我输入文件名（Test.xls）后、打开该文件时，里面有一个Sheet
我想让这个Sheet的名字自动变成我的文件名（Test）。
该如何做？
------解决方案--------------------------------------------------------
excel vba中有一个Workbook_Open()函数，你可以在其中写入变名语句，即完成在打开工作簿之前将工作表变名的目的.....
------解决方案--------------------------------------------------------
Private Sub Workbook_Open()
Sheets("Sheet").Name = "Test"
End Sub
------解决方案--------------------------------------------------------
- VB code
Private Sub Workbook_Open() Sheets(1).Name = Split(ThisWorkbook.Name, ".")(0) ' 将工作簿中第一个表名改为工作簿名End Sub
------解决方案--------------------------------------------------------
楼上的方法可行，支持一下。
------解决方案--------------------------------------------------------
这个简单，用activesheet吧