Pop up message box when first opening spreadsheet?

[dlowery06]

Can I create a message box that displays a message when the spreadsheet is first opened?

If so, where do I put it?

 

[kevin.philips]

Hi Add this into a new module:

Sub Autpen
MsgBox "Put your message here" , vbinformation + vbokonly , "Your Message"
End Sub

 

[phantom1975]

You will need to put the following in the ThisWorkbook module:

Private Sub Workbook_Open()
MsgBox "Hello",vbOkOnly+vbExclamation,"Title for HELLO"
End Sub

 

[dlowery06]

Works great!

Worked like a charm! Thanks for the information from both of you.

BTW, like Kevin.Philips said, it doesn't have to go in the Thisworkbook module, I put it in an empty module that I had open and it worked great!

 

[TommyGun]

This is true, it will work, but the Autpen procedure is the older way of doing what you want. The Worksheet_Open event is the "cleaner" way to do this.

 

[MrRosco]

You will need to put the following in the ThisWorkbook module:

Private Sub Workbook_Open()
MsgBox "Hello",vbOkOnly+vbExclamation,"Title for HELLO"
End Sub

Thanksforthis

 

[stephNE2]

You will need to put the following in the ThisWorkbook module:

Private Sub Workbook_Open()
MsgBox "Hello",vbOkOnly+vbExclamation,"Title for HELLO"
End Sub

Using this, I get a Compile Error: "Invalid outside procedure"

Thoughts?

 

[DaveMitch]

Glad I saw this thread. I have a spreadsheet that I have a pop up window with a message which works almost fine.....the message appears, but it stays minimised with the sheet on the taskbar, which isn't always obvious to users, have I created my message incorrectly?

Any thoughts greatly appreciated!