Question

excel sheet表名与文件名同时变化？

excel里只有一个sheet表，sheet表的名称与文件名是一样的，文件名改变sheet表的名字也跟着改变（保存后），不是用宏做的，在vba里没有模块显示，也没有代码显示，都是空的。还有什么方法能实现这个功能啊？
另外，把全表复制出来再保存的时候会提示“包含宏、activeX控件、XML扩展包、web组件等个人信息”什么什么的
感谢关注， 用宏来操作的话我自己就可以了 就不用麻烦大家了，现在这个问题真挺诡异的

Answer 1

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

祝你快乐！

Answer 2

Private Sub Workbook_Open()

If Sheets.Count = 1 Then Sheets(1).Name = ActiveWorkbook.Name

End Sub