Workbook.Close events

[pilot]

Does putting this in the Workbook_BeforeClose event cause the file to be saved twice?

ActiveWorkbook.Close SaveChanges:=True

 

[Legacy 98055]

Yes.
Example:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
MsgBox "Saving Workbook"
ActiveWorkbook.Close SaveChanges:=True
End Sub

Tom

 

[Ephraim Flintwinch]

Why not just use :-

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
End Sub

 

[pilot]

The Before_Close event triggers a few other things like changing worksheets' visible settings. I was trying to save the file after other such activities so when the actual close was attempted, the file would not be dirty.

 

[Ephraim Flintwinch]

On 2002-09-11 07:34, pilot wrote:
The Before_Close event triggers a few other things like changing worksheets' visible settings. I was trying to save the file after other such activities so when the actual close was attempted, the file would not be dirty.

OK, so change it to :-

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Do some things here
ActiveWorkbook.Save
End Sub