Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
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 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Exit Menu Troubles
Will,
Cancel is not a global variable, but is local to the before_close event, so you will need to set cancel to true within the event code itself. HTH, Bernie MS Excel MVP "WillRn" wrote in message ... 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 |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Exit Menu Troubles
Okay, that makes sense. But how do I use my custom menu and stay in the
before_close event so that cancel=true will work? "Bernie Deitrick" wrote: Will, Cancel is not a global variable, but is local to the before_close event, so you will need to set cancel to true within the event code itself. HTH, Bernie MS Excel MVP "WillRn" wrote in message ... 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 |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Exit Menu Troubles
Will,
You could declare a public global variable that your button click sets to true: At the top of a module Public glblCancel As Boolean Then in your sub that show the userform: Sub TryNow() glblCancel = False ' initialize Load UserForm1 UserForm1.Show 'user interacts with the userform MsgBox glblCancel ' this is set in the click event End Sub Private Sub ReturnButton_Click() glblCancel = True Unload ExitOptions Application.ExecuteExcel4Macro "HALT(True)" End Sub Then in the before close event: .... Cancel = glblCancel ..... HTH, Bernie MS Excel MVP "WillRn" wrote in message ... Okay, that makes sense. But how do I use my custom menu and stay in the before_close event so that cancel=true will work? "Bernie Deitrick" wrote: Will, Cancel is not a global variable, but is local to the before_close event, so you will need to set cancel to true within the event code itself. HTH, Bernie MS Excel MVP "WillRn" wrote in message ... 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 |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Exit Menu Troubles
That worked,
Thanks a bunch! "Bernie Deitrick" wrote: Will, You could declare a public global variable that your button click sets to true: At the top of a module Public glblCancel As Boolean Then in your sub that show the userform: Sub TryNow() glblCancel = False ' initialize Load UserForm1 UserForm1.Show 'user interacts with the userform MsgBox glblCancel ' this is set in the click event End Sub Private Sub ReturnButton_Click() glblCancel = True Unload ExitOptions Application.ExecuteExcel4Macro "HALT(True)" End Sub Then in the before close event: .... Cancel = glblCancel ..... HTH, Bernie MS Excel MVP "WillRn" wrote in message ... Okay, that makes sense. But how do I use my custom menu and stay in the before_close event so that cancel=true will work? "Bernie Deitrick" wrote: Will, Cancel is not a global variable, but is local to the before_close event, so you will need to set cancel to true within the event code itself. HTH, Bernie MS Excel MVP "WillRn" wrote in message ... 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 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Troubles | Excel Discussion (Misc queries) | |||
COM Add-in Troubles | Excel Discussion (Misc queries) | |||
IF troubles | Excel Worksheet Functions | |||
Can only exit the program from the file menu | Excel Discussion (Misc queries) | |||
If a called sub exit, how to the caller exit right away? | Excel Programming |