No.1
标题是一个名称,比如一个人的名字,张三李四,它是一个代号,以此来确定某个对象。
但是Excel VBA中的标题和名字还不是一回事儿。
有些区别。
如上图所示,Application对象的Caption属性就是标题的设置方法。
Application.Caption="这是一个示例"
上述代码可修改打开的工作薄标题为“这是一个示例”,其实这行代码可将所有打开的工作薄标题都改为同样的。
那么如何改回默认的标题?
用如下代码可实现:
Application.Caption = Empty
也就是把Caption设置为Empty值,Empty表示"空",这个空并不是真正的空值,它还有一个值内容为“空”,总之,感觉很玄乎,但它就是有一个空值。
如果想要改为真正的空值,用如下代码:
Application.Caption = ""
上面是两个双引号,中间什么也没有。
如上示例,分别两个按钮,一个为设置标题,另一个为恢复默认。
结果就在工作表头部可以显示出来,可以自己试一下,很简单。
No.2
下图为代码:
Private Sub CommandButton1_Click()
Application.Caption = "这是一个设置标题示例!"
End Sub
Private Sub CommandButton2_Click()
Application.Caption = Empty
End Sub
当然了,如果要输出Caption并不仅仅是设置的值。
它包含了工作薄名称+"-"+设置的字符串。也就是说,当使用如下代码:
MsgBox Application.Caption
将输出"工作表1.xls - 这是一个设置标题示例!"
如有兴趣可以实际操作试一下。
划重点:
- Application.Caption="这是一个示例"
- Application.Caption = Empty
- TitelName=Application.Caption
欢迎关注、收藏
---END---