ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   want to create a message box to appear on open (https://www.excelbanter.com/excel-discussion-misc-queries/47171-want-create-message-box-appear-open.html)

Fionajpower

want to create a message box to appear on open
 
I want to be able to have a Message appearing the first time o open a
worksheet in an excel document or even have appear when the document
opensinitially.
can this be done easily and removed easily?

David Hepner

Private Sub Workbook_Open()
'Place this code in the ThisWorkbook object
MsgBox "Insert your message here", vbInformation, "Insert your message box
title here"

End Sub


"Fionajpower" wrote:

I want to be able to have a Message appearing the first time o open a
worksheet in an excel document or even have appear when the document
opensinitially.
can this be done easily and removed easily?


Norman Jones

Hi Fiona,

Paste the following code into a standard module in the workbook:

Sub Auto_Open
Msgbox "Hi from Fiona!"
End sub

If you are new to macros, you may wish to visit David McRitchie's 'Getting
Started With Macros And User Defined Functions' at:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

For your immediate purposes, however:

Alt-F11 (to open the Visula Basic Editor)
Alt IM (to insert a new module)
Paste the code at the cursor point
Alt-F11 (to return to Excel)
Now, whenever the workbook is opened, the greeting will appear.

To delete the macro, in Excel:

Alt-F8 (opens the Macro dialog box)
Select 'Auto_Open) in the dropdown list
Hit the dialog's Delete button

---
Regards,
Norman



"Fionajpower" wrote in message
...
I want to be able to have a Message appearing the first time o open a
worksheet in an excel document or even have appear when the document
opensinitially.
can this be done easily and removed easily?





All times are GMT +1. The time now is 07:36 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com