View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
David A. David A. is offline
external usenet poster
 
Posts: 64
Default Trying to close without the message do you want to save

The save alert is still popping up. What do I do to just open the page
"Open" and save without the pop up?
Private Sub Workbook_Close()
Application.DisplayAlerts = False
Application.CommandBars("Standard").Visible = True
Application.CommandBars("Formatting").Visible = True
Application.CommandBars("Visual Basic").Visible = True
Application.CommandBars("Control ToolBox").Visible = True
Application.CommandBars("Forms").Visible = True
Application.CommandBars("Web").Visible = True
Sheets("Open").Select
Range("A75").Select
For Each w In Application.Workbooks
w.Save
Next w
ActiveWorkbook.Close
End Sub