如何設定Excel工作薄標題

2021-05-21 14:00:32

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 SubPrivate Sub CommandButton2_Click()Application.Caption = EmptyEnd Sub

當然了，如果要輸出Caption並不僅僅是設定的值。

它包含了工作薄名稱+"-"+設定的字元串。也就是說，當使用如下程式碼：

MsgBox Application.Caption

將輸出"工作表1.xls - 這是一個設定標題示例！"

如有興趣可以實際操作試一下。

劃重點：

Application.Caption="這是一個示例"Application.Caption = EmptyTitelName=Application.Caption歡迎關注、收藏

---END---