Skip workbookbefore_close sub: how

[Dinictus]

I have a file with a nice workbook_beforeclose sub in it. In this sub some cells are checked for their contents and if the contents is not correct the sheet will not close.

However, I want to insert a button with which people can exit the sheet anyways.
Now I have a activeworkbook.close statement behind this button but then ofcourse the workbookbefore_close sub stops the file from being closed.

Can I somehow program the button to skip the workbook_beforeclose sub?

thnks, I hope someone can help me.

 

[dk]

Hi,

One way you could do it is to declare a variable in a standard module as Public e.g.

Public OKToClose As Boolean

Then in your command button code put this:-

OKToClose = True

Then in your Workbook_Close subroutine put this:-

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If OKToClose = True Then Exit Sub

'Rest of your code
End Sub


HTH,
Dan

 

[Dinictus]

Right!

This works. I thank you a lot!

Cheers.
This message was edited by Dinictus on 2002-04-24 06:38

 

[dhoffman]

you can also turn off events with
application.enableevents = false
don't foget to turn them back on.