I want a message box to come up when I close an Excel worksheet

In the "This Workbook" module I have inserted the following code

Private Sub Workbook_Close()

MsgBox "This Worksheet is now closing"

End Sub

When I click on F5 in Visual Basic Editor, it works, but when I close the
document, it doesn't.

Any ideas?

Many thanks

Kindest regards

PaddyMac

Double click 'This Workbook' and see the drop downs on the right code module
to see the workbook events...

'Remove your code and copy paste the below and try
Private Sub Workbook_BeforeClose(Cancel As Boolean)
MsgBox "This Worksheet is now closing"
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"PaddyMac" wrote:

> I want a message box to come up when I close an Excel worksheet
>
> In the "This Workbook" module I have inserted the following code
>
> Private Sub Workbook_Close()
>
> MsgBox "This Worksheet is now closing"
>
> End Sub
>
> When I click on F5 in Visual Basic Editor, it works, but when I close the
> document, it doesn't.
>
> Any ideas?
>
> Many thanks
>
> Kindest regards
>
> PaddyMac

hi.
there isn't a workbook_close event. there is a workbook_beforeclose event
change the sub title to Sub WorkBook_BeforeClose(Cancel As Boolean)

regards
FSt1

"PaddyMac" wrote:

> I want a message box to come up when I close an Excel worksheet
>
> In the "This Workbook" module I have inserted the following code
>
> Private Sub Workbook_Close()
>
> MsgBox "This Worksheet is now closing"
>
> End Sub
>
> When I click on F5 in Visual Basic Editor, it works, but when I close the
> document, it doesn't.
>
> Any ideas?
>
> Many thanks
>
> Kindest regards
>
> PaddyMac

Jacob

It works perfectly.

Many thanks!

Kindest regards

PaddyMac

"Jacob Skaria" wrote:

> Double click 'This Workbook' and see the drop downs on the right code module
> to see the workbook events...
>
> 'Remove your code and copy paste the below and try
> Private Sub Workbook_BeforeClose(Cancel As Boolean)
> MsgBox "This Worksheet is now closing"
> End Sub
>
> If this post helps click Yes
> ---------------
> Jacob Skaria
>
>
> "PaddyMac" wrote:
>
> > I want a message box to come up when I close an Excel worksheet
> >
> > In the "This Workbook" module I have inserted the following code
> >
> > Private Sub Workbook_Close()
> >
> > MsgBox "This Worksheet is now closing"
> >
> > End Sub
> >
> > When I click on F5 in Visual Basic Editor, it works, but when I close the
> > document, it doesn't.
> >
> > Any ideas?
> >
> > Many thanks
> >
> > Kindest regards
> >
> > PaddyMac

Perfect!

Thank you so much!

Kindest regards

PaddyMac

"FSt1" wrote:

> hi.
> there isn't a workbook_close event. there is a workbook_beforeclose event
> change the sub title to Sub WorkBook_BeforeClose(Cancel As Boolean)
>
> regards
> FSt1
>
> "PaddyMac" wrote:
>
> > I want a message box to come up when I close an Excel worksheet
> >
> > In the "This Workbook" module I have inserted the following code
> >
> > Private Sub Workbook_Close()
> >
> > MsgBox "This Worksheet is now closing"
> >
> > End Sub
> >
> > When I click on F5 in Visual Basic Editor, it works, but when I close the
> > document, it doesn't.
> >
> > Any ideas?
> >
> > Many thanks
> >
> > Kindest regards
> >
> > PaddyMac