发布网友 发布时间:2022-04-26 02:59
共2个回答
热心网友 时间:2022-06-20 07:34
在thisworkbook工作簿代码区写如下代码即可。第一个SUB是设置标题,第二个是恢复默认标题
Private Sub Workbook_Activate()
Application.Caption = "XXX有限公司"
End Sub
Private Sub Workbook_Deactivate()
Application.Caption = ""
End Sub
热心网友 时间:2022-06-20 07:34
这种情况看起来是使用VBA代码实现的,没错的话你这个表格是启用宏的工作簿,后缀是.xlsm的,这样的话可以通过以下方法实现:
VBA代码添加
Sub Auto_Open()
Application.Caption = "****有限公司"
End Sub
这样每次打开这个表格就会自动将标题栏的“Microsoft Excel”改成指定的字符串,如上面的“****有限公司”。
希望能帮上忙!
追答请问问题解决了吗