文章最後更新於 2020 年 9 月 17 日 下午 04:29
1.關閉螢幕刷新
'關閉螢幕刷新-放在最前面
Application.ScreenUpdating = False
'開啟螢幕刷新-放在最後面
Application.ScreenUpdating = True
2.關閉公式自動計算
'注意關閉後只會以當前的資料進行程式
'公式計算-關閉
Application.Calculation = xlManual
'公式計算-開啟
Application.Calculation = xlAutomatic