View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Mike H Mike H is offline
external usenet poster
 
Posts: 11,501
Default Message Box on exiting workbook

Hi,

maybe this

Private Sub Workbook_BeforeClose(Cancel As Boolean)
response = MsgBox("Are you sure you want to quit?", vbYesNo)
If response = vbNo Then
Cancel = True
End If
End Sub

Mike

"cufc1210" wrote:

I have a spreadsheet where i have a macro that saves and exits the workbook.

when the save & Exit button is pressed is it possible to have a message box
pop up and ask if they are sure they want to exit the workbook. Then when
they select ok it will continue to save and exit.

I hope this makes sense