Save file dialog box in Excel

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

When working on a document I clicked on the x to close the worksheet and I
got the usual dialogue and instead of clicking yes to save it I accidentally
selected no.

I know this question is far-fetched but I thought I would ask it anyway. Is
there any Excel options that can be set to prompt you again.

Thanks.
 
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Cancel = True
Application.EnableEvents = False
If MsgBox("Save the file", vbYesNo) = vbYes Then
ThisWorkbook.Save
Else
If MsgBox("ARe you sure you don't want to save the file", vbYesNo) =
vbNo Then
ThisWorkbook.Save
End If
End If

End Sub

'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet
'(or next to the File menu if you maximise your workbooks),
'select View Code from the menu, and paste the code


--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)
 
Re-enable events?

--
Jim
| Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
| Boolean)
| Cancel = True
| Application.EnableEvents = False
| If MsgBox("Save the file", vbYesNo) = vbYes Then
| ThisWorkbook.Save
| Else
| If MsgBox("ARe you sure you don't want to save the file", vbYesNo)
=
| vbNo Then
| ThisWorkbook.Save
| End If
| End If
|
| End Sub
|
| 'This is workbook event code.
| 'To input this code, right click on the Excel icon on the worksheet
| '(or next to the File menu if you maximise your workbooks),
| 'select View Code from the menu, and paste the code
|
|
| --
| ---
| HTH
|
| Bob
|
| (there's no email, no snail mail, but somewhere should be gmail in my
addy)
|
|
|
| | > When working on a document I clicked on the x to close the worksheet and
I
| > got the usual dialogue and instead of clicking yes to save it I
| > accidentally
| > selected no.
| >
| > I know this question is far-fetched but I thought I would ask it anyway.
| > Is
| > there any Excel options that can be set to prompt you again.
| >
| > Thanks.
|
|
 
If you are asking if you can get your unsaved work back the answer is no.


Gord Dibben MS Excel MVP
 
Thank-you, it would be a good idea.

--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)
 
Back
Top