| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Case Event
I have the following code:
Case vbNo FName = Application.GetSaveAsFilename(InitFileName, "Excel File_ (*.xls),*.xls") If FName < False Then ActiveWorkbook.SaveAs FName, CreateBackup = False Else Exit Sub End If Case vbYes ThisWorkbook.Saved = True Application.Quit Case vbCancel Cancel = True Exit Sub My question is: For case vbno, instead of saving the file and I cancel the SaveAs, the application quits when I only want to exit the sub and return to the worksheet. -- Thanks! |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Case Event
In what event is this code located in? Assuming it's on the
Workbook_BeforeClose event, add Cancel=True before calling exit sub. So, Cancel=True Exit Sub "Daviv" wrote: I have the following code: Case vbNo FName = Application.GetSaveAsFilename(InitFileName, "Excel File_ (*.xls),*.xls") If FName < False Then ActiveWorkbook.SaveAs FName, CreateBackup = False Else Exit Sub End If Case vbYes ThisWorkbook.Saved = True Application.Quit Case vbCancel Cancel = True Exit Sub My question is: For case vbno, instead of saving the file and I cancel the SaveAs, the application quits when I only want to exit the sub and return to the worksheet. -- Thanks! |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Case Event
Have you declared FName as type Variant
-- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "Daviv" wrote in message ... I have the following code: Case vbNo FName = Application.GetSaveAsFilename(InitFileName, "Excel File_ (*.xls),*.xls") If FName < False Then ActiveWorkbook.SaveAs FName, CreateBackup = False Else Exit Sub End If Case vbYes ThisWorkbook.Saved = True Application.Quit Case vbCancel Cancel = True Exit Sub My question is: For case vbno, instead of saving the file and I cancel the SaveAs, the application quits when I only want to exit the sub and return to the worksheet. -- Thanks! |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| countif function: how to distinguish case/make case sensitive | Excel Worksheet Functions | |||
| change data of entire column from small case to upper case | Excel Worksheet Functions | |||
| Changing multiple cell text from lower case to upper case | Excel Discussion (Misc queries) | |||
| Change the text from lower case to upper case in an Excel work boo | Excel Discussion (Misc queries) | |||
| VBA- Calendar Control Click Event W Specific Select Case requirements | Excel Programming | |||
Linear Mode
