Use a user form.
Use this code

Private Sub Workbook_Open()

Userform1.Show True

End Sub



or, if you want a text message only use this code

Private Sub Workbook_Open()



Sheets("Welcome").Select
Rows("2:6").Select
Selection.EntireRow.Hidden = True
Range("A1").Select

MsgBox "Line 1" & vbNewLine & _
"Line 2" & vbNewLine & _
"Line 3" & vbNewLine & _
"Line 4"
End Sub


--
If this reply was helpful, please indicate that your question has been
answered to help others find anwsers to similar questions.

www.silverbirddesigns.com

Fighting Texas Aggie Class of 2009


"Patty" wrote:

Can a pop up message be displayed at the opening or closing of an excel file?