Exit Menu Troubles
I am in the process of creating an "exit menu" that triggers on the
"before_close" event on the workbook. The menu itself is fairly simple
offering 4 buttons:
1. Email spreadsheet
2. Save spreadsheet
3. Return to the worksheet
4. Exit the worksheet
The email, save, and exit buttons work fine. The trouble that I am having is
the "Return to worksheet" button.
I have tried the following code:
Private Sub ReturnButton_Click()
Cancel = True
Unload ExitOptions
Application.ExecuteExcel4Macro "HALT(True)"
End Sub
If I try to cancel the exit, the sheet still closes. I can't seem to get it
to return an halt the closing process.
I have tried quite a few permutations, but still nada,
Any suggestions?
WillRn
|