Change caption in the Title Bar
|
Macro Title:
|
|
First Caption Name:
|
|
Second Caption Name:
|
|
First Comment:
' |
|
Second Comment:
' |
Sub Change_Title_Bar_Caption()
'change the first caption of the Title Bar
ActiveWindow.Caption = "First Caption"
'change the second caption of the Title Bar
Application.Caption = "Second Caption"
End Sub