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---