Workbook_open : Putting in message in titlebar (Visual Basic)

J

Jorgen [DK/2600]

Hi,

I can't find the syntax for putting in a small message in the titlebar when
opening the workbook

Any one ? :cool:

regards
jorgen
 
K

kassie

Hi

Put this in your This Workbook code
Private Sub Workbook_Open()
'MsgBox ("Good Day, your favourite spreadsheet is now open")
CreateObject("WScript.Shell").Popup " Good day, your favourite
spreadsheet is now open", 3, "Welcome back!"
End Sub

Obviously, you can replace the posted text with whatever you like!
 
J

Jorgen [DK/2600]

thanks.

- jorgen

kassie said:
Hi

Put this in your This Workbook code
Private Sub Workbook_Open()
'MsgBox ("Good Day, your favourite spreadsheet is now open")
CreateObject("WScript.Shell").Popup " Good day, your favourite
spreadsheet is now open", 3, "Welcome back!"
End Sub

Obviously, you can replace the posted text with whatever you like!
Click to expand...
 
Top