Trying to close without the message do you want to save

D

David A.

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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top