1、開啟Excel 2003或2007或2010或2013完整版版本。2、進入“開發工具”一欄。3、點選“Visual Basic”選項卡中的“編輯器”。4、雙擊“ThisWorkBook”或“工作表1”。5、在空白區域填寫程式碼：Sub 儲存所有已開啟的工作簿()，Dim i As Workbook，For Each i In Workbooks， If i.Path "" Then，i.Save， End If，Next ，End Sub。6、點選“執行”。7、點選“執行子過程/UserForm”就可以了。

在 ThisWordbook 的 Open 事件中（在VBA編輯視窗中）新增程式碼：

Application.DisplayAlerts = True

儲存後再開啟就遮蔽了提示對話方塊。不過要允許執行宏。

也可以在立即視窗（在VBA編輯視窗中）輸入：

Application.DisplayAlerts = True

後按回車，這種方法關閉工作簿後再開啟就失效了。