First of all many thanks for the quick response. However, that is where it
is in both my 'real' file and the 'test the beforesave event only' file. In
my 'real' file I have a beforeclose event and that works like a treat.

Regards
JMCS

"Joel" wrote:

It needs to be in THISWORKBOOK module of the VBA code.

Books event are in Thisworkbook
Sheet events must match the sheet in the worksheet where you want the event
to occur.

"JMCS" wrote:

I am having problems getting this event to kick in. I need to intercept any
attempt to use the File Save menu or icon to make sure that the user's name
is captured (I do that on the Workbook Close event). I have just tried the
Help sample code (below) but cannot get that to work. Any ideas, please?

Private Sub App_WorkbookBeforeSave(ByVal Wb As Workbook, _
ByVal SaveAsUI As Boolean, Cancel as Boolean)
a = MsgBox("Do you really want to save the workbook?", vbYesNo)
If a = vbNo Then Cancel = True
End Sub


JMCS