朋友們好,今日講VBA代碼的第三十七講,如何通過VBA代碼改變Excel主窗口标題欄名稱。
我們知道Excel主窗口标題欄默認的名稱是"Microsoft Excel",那麼有沒有什麼辦法更改這個設置呢?因為隻顯示 "Microsoft Excel"太單調了。其實,我們可以通過設置Application對象的Caption屬性來改變Excel主窗口的标題欄。
應用于Application對象的Caption屬性設置會顯示在Microsoft Excel主窗口标題欄中的名稱,語法如下:expression.Caption。如果未設置Caption屬性("")或将其設置為Empty(表示未初始化的變量值),則本屬性返回默認的"Microsoft Excel"。将Caption屬性設置為常數vbNullChar(表示值為 0 的字符)可以删除标題欄中的名稱。
下面我們通過一段代碼來說明改變Caption屬性後改變主窗口标題欄默認名稱的辦法,如下面的代碼所示。
Private Sub Workbook_Activate()
Application.Caption = "VBA和GO語言"
End Sub
Sub MyAppCaption()
MsgBox "下面将恢複默認的标題欄名稱!"
Application.Caption = Empty
End Sub
代碼解析:
第2行代碼将Excel窗口标題設置為"VBA和GO語言"。
代碼運行後:窗口标題變成為"VBA和GO語言"。
在運行MyAppCaption後,窗口标題變又成為"Microsoft Excel"了。
那麼有沒有辦法把窗口标題變成空呢?有,看下面的代碼:
Private Sub Workbook_Activate()
Application.Caption = vbNullChar
End Sub
Sub DleCaption()
MsgBox "下面将恢複默認的标題欄名稱!"
Application.Caption =Empty
End Sub
代碼解析:
第2行代碼删除Excel主窗口标題欄,
第5行代碼恢複Microsoft Excel主窗口标題欄中的名稱。這是通過設置Caption的屬性為 Empty來完成的。
今日内容回向:
1 Application對象的Caption屬性有什麼意義?
2 如何改變Excel主窗口标題欄的名稱呢
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!