Close All and Workbook_BeforeClose events

[Josh Sale]

I've encountered the following problem that I wonder if anybody else has
encountered.

I have an application that is implemented as an Excel add-in. Each workbook
that contains application data contains a Workbook_BeforeClose event handler
that calls code in the add-in. If the user closes the workbook in any of
the typical ways, the event is raised and life is good.

However, if a user has two or more application workbooks open and then does
a File | Close All (accessed by holding down the Shift key when clicking the
File menu item) then the Workbook_BeforeClose event is only raised for the
active workbook ... even though all of the workbooks are being closed. As a
result, my application doesn't have a chance to cleanup after all of the
workbooks being closed.

I would have thought/hoped that Workbook_BeforeClose would be called for
each successive workbook (first making that workbook active since the event
doesn't provide the workbook as an argument).

Is anybody else surprised by this behavior?

Anybody got any good workarounds?

TIA,

josh

 

[Bob Phillips]

Are you talking application events? IS the code in the first workbook being
closed perhaps?

--

HTH

Bob Phillips

(replace xxxx in the email address with gmail if mailing direct)

 

[Mark Driscol]

Josh, I just tried this and it worked fine for me. I was not using and
add-in, I just created three workbooks and put Workbook_BeforeClose
code in each.

Mark

 

[Josh Sale]

No, its not an application event. Each workbook has Workbook_BeforeClose in
its ThisWorkbook module. Each event handler has just a single line that
makes a call into the add-in.

 

[Josh Sale]

I repeated your experiment placing a Workbook_BeforeClose event handler into
each workbook. Each event handler had a single statement:

Msgbox Activeworkbook.Name

As you suggested, in this case the event is raised twice (once for each
workbook). Unfortunately, the same workbook is active for both events. So
there is no way to tell what workbook the event is being raised for!

josh

 

[Mark Driscol]

Josh, I used

MsgBox Me.Name

and it told me what Workbook the event was for.

Mark

 

[Josh Sale]

Great tip Mark!!!

Thanks.

Josh, I used

MsgBox Me.Name

and it told me what Workbook the event was for.

Mark