Pop Up Screen

M

Marcus

Is there a way to create a screen that pops up and displays a message when
you open a spreadsheet?
 
P

Paul B

Marcus, if macros are enabled,

Private Sub Workbook_Open()
MsgBox "Your message here", , "Title here"
End Sub

To put in this macro, from your workbook right-click the workbook's icon and
pick View Code. This icon is to the left of the "File" menu this will open
the VBA editor, in Project Explorer double click on thisworkbook, under your
workbook name, if you don't see it press CTRL + r to open the Project
Explorer, then, paste the code in the window that opens on the right hand
side, press Alt and Q to close this window and go back to your workbook, now
this will run every time you open the workbook. If you are using excel 2000
or newer you may have to change the macro security settings to get the macro
to run. To change the security settings go to tools, macro, security,
security level and set it to medium

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003
 
D

Dave Peterson

Private Sub Workbook_Open()
MsgBox "Your message here" & worksheets("sheet99").range("a1").value, _
, "Title here"
End Sub
 
M

Marcus

Ok, not to be a pain but can you set it up to select more than one cell for
the message?
 
D

Dave Peterson

You can even get the stuff from different sheets:

Private Sub Workbook_Open()
MsgBox "Your message here" & worksheets("sheet99").range("a1").value & _
"more text here " & worksheets("sheet101").range("b99").value, _
, "Title here"
End Sub
 
Top