方 於 2017年3月17日 下午5:15 寫道:
Micheal您好,
在討論區上看見Yvens 提問「營在表是否機會能中途自動儲存。舉例來說現在我收藏200支...若一次全勾選去跑...一旦發生問題時,就得重新來...」
若有需要使用到,提供您VBA的範本參考:
假設適用迴圈For i to ?? ,有遞增的變數i
或是用Do迴圈i = i + 1,有遞增的變數i
If i Mod 200 = 0 Then ActiveWorkbook.Save
上面舉例有變數i,遇到完成第200次則存檔。要依照VBA實際使用的變數來替代i,依照實際需求來替代200。如VBA實際用的變數是t,需要10筆存檔一次:
For t = 1 to 1000
'自動存檔程式碼需放置在迴圈內的最後
If t Mod 10 = 0 Then ActiveWorkbook.Save
Next t
參考microsoft說明文件:
1.Mod 運算子 (Visual Basic)
https://msdn.microsoft.com/zh-tw/library/se0w9esz.aspx
2.Workbook.Save 方法 (Excel)
https://msdn.microsoft.com/zh-tw/library/office/ff197585.aspx
或許用不上,抱歉打擾您。
(非學員) 方