Hi,

It looks like Excel is doing exactly what your telling it to do. In your
'other' sub your saying close without saving the changes. the workbook before
close event executes and unhides all your sheets but then these changes
aren't saved so the workbook stays in the state it was before the code
executed.

Mike

"Dave Unger" wrote:

Hello,

Ive searched the groups, but cant seem to find anything that quite
addresses this, hoping someone can tell me where Im going wrong.

I have the following code in the BeforeClose event :

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Dim wk As Worksheet

For Each wk In ThisWorkbook.Worksheets
wk.Visible = xlSheetVisible
Next wk

End Sub

When I close the workbook manually, it works as expected. But if I
run
€œThisWorkbook.Close savechanges:=False€� from a procedure, it doesnt.
I can step thru the code manually, but nothing happens. Im getting
the same results with XL97 & 2007, so obviously Im missing something
basic here. Any help would be very much appreciated.

regards

Dave U