ALT+F11打开VBA编辑器 然后插入一个模块 加入下面的代码 Sub tt() Application.Caption = ThisWorkbook.Name End Sub
然后运行追问打不开编辑器
追答
如果按ALT+F11,不能出来的话,就打开EXCEL,点工具→宏→Visual Basic 编辑器,就可以打开编辑器了,里面点工程资源管理器,就会出来编辑模块,然后插入一个模块 加入下面的代码 Sub tt() Application.Caption = ThisWorkbook.Name End Sub