Pop-up message box when saving

[Tim in Toronto]

Hi All,

I'd like to create a message box that pops up when I go to save file. The message box is just a reminder to make sure that certain things were filled out before the file is saved. Any ideas?

Tim

 

[VoG]

Try this: right click the Excel logo just to the left of File on the menu bar, select View Code and paste in

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox "Your message here", vbInformation, "Check"
End Sub

 

[Tim in Toronto]

Hi Peter,

I don't have an Excel logo to the left of my file menu. However, I think your idea would prompt that message anytime I save a file. I guess I wasn't specific enough. I only want the message box to pop-up when I'm saving a particular file.

 

[VoG]

Open the specific file that you want to have this message appear in, press ALT + F11 to open the Visual Basic Editor. In the "Project - VBA project" window, double click ThisWorkbook then paste the code into the right hand pane.

 

[kmbacon]

VOG, I was able to use this code to produce the popup message I want at the time the user saves. The problem is when I close the workbook and come back in the message no longer appears and the code is gone from VBA. Any suggestions - Karen

 

[VoG]

Make sure that you save the file as a macro enabled workbook (*.xlsm).

 

[kmbacon]

Thanks that worked. Two other questions...
1. If I have two lines of text in my message box how do I get them to show in the box on seperate lines instead of one string?
2. Is there anyway to have the worksheet always open with Marcos enabled so the user does not have to make this selection?

 

[VoG]

1. Try

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox "Your message here" & vbNewLine & "Line 2", vbInformation, "Check"
End Sub

2. You cannot.

 

[Nerocell]

This worked perfectly for me. Thank you so much for this code. Been trying to figure this out for a couple days and then BOOM, it's all right here. Thanks Again VoG. Joe

 

[monkeyboy4]

Hey there, i was wondering - is there any way of getting a message to pop-up when you select save and send?