日日操夜夜添-日日操影院-日日草夜夜操-日日干干-精品一区二区三区波多野结衣-精品一区二区三区高清免费不卡

公告:魔扣目錄網為廣大站長提供免費收錄網站服務,提交前請做好本站友鏈:【 網站目錄:http://www.ylptlb.cn 】, 免友鏈快審服務(50元/站),

點擊這里在線咨詢客服
新站提交
  • 網站:51998
  • 待審:31
  • 小程序:12
  • 文章:1030137
  • 會員:747

要用VBA來關閉工作簿,用Workbook.Close 方法即可,而要退出Excel,則用Application.Quit 方法。下面是一些代碼示例:

關閉活動工作簿,如果工作簿有更改,提示是否保存:

Sub CloseWorkbook()
ActiveWorkbook.Close
End Sub

如果要避免出現提示,可添加“SaveChanges”參數,如直接保存并關閉工作簿:

Sub ClostAndSaveWorkbook()
ActiveWorkbook.Close Savechanges:=True
End Sub

將上述代碼中的“True”改為“False”,則直接關閉工作簿而不保存。

關閉所有打開的工作簿,并提示是否保存:

Sub CloseAllWorkbooks()
On Error Resume Next
Workbooks.Close
End Sub

退出Excel,并提示對有更改的工作簿進行保存:

Sub QuitExcel()
Application.Quit
End Sub

保存活動工作簿并退出Excel:

Sub SaveActiveWorkAndQuit()
ActiveWorkbook.Save
Application.Quit
End Sub

下面的代碼在退出Excel時都不會提示是否保存工作簿。

保存所有打開的工作簿并退出Excel:

Sub SaveAllAndQuit()
For Each wbk In Workbooks
wbk.Save
Next
Application.Quit
End Sub

退出Excel,所有的改動都不保存:

Sub QutiAndNoAlerts()
Application.DisplayAlerts = False
Application.Quit
End Sub

分享到:
標簽:保存 關閉 工作 退出 Excel函數
用戶無頭像

網友整理

注冊時間:

網站:5 個   小程序:0 個  文章:12 篇

  • 51998

    網站

  • 12

    小程序

  • 1030137

    文章

  • 747

    會員

趕快注冊賬號,推廣您的網站吧!
最新入駐小程序

數獨大挑戰2018-06-03

數獨一種數學游戲,玩家需要根據9

答題星2018-06-03

您可以通過答題星輕松地創建試卷

全階人生考試2018-06-03

各種考試題,題庫,初中,高中,大學四六

運動步數有氧達人2018-06-03

記錄運動步數,積累氧氣值。還可偷

每日養生app2018-06-03

每日養生,天天健康

體育訓練成績評定2018-06-03

通用課目體育訓練成績評定