I am interested in creating a message that will automatically pop up when I
go to save a document. Any suggestions?

Cathy,

Alt +F11 to open VB editor double click 'ThisWorkbook' and paste the code
below in on the right. Edit message & Title to suit.


Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
resp = MsgBox("Here's a message fro me", vbInformation, "My Message")
End Sub

Mike

"Cathy" wrote:

> I am interested in creating a message that will automatically pop up when I
> go to save a document. Any suggestions?
>
>

Thank you for your response. I followed your instructions below but it
doesn't seem to be working. Once I copy and paste what is my next step?
--
Cathy


"Mike H" wrote:

> Cathy,
>
> Alt +F11 to open VB editor double click 'ThisWorkbook' and paste the code
> below in on the right. Edit message & Title to suit.
>
>
> Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
> resp = MsgBox("Here's a message fro me", vbInformation, "My Message")
> End Sub
>
> Mike
>
> "Cathy" wrote:
>
> > I am interested in creating a message that will automatically pop up when I
> > go to save a document. Any suggestions?
> >
> >