VBA：啟用 預設計算、畫面更新、事件提醒、顯示狀態列( Application.ScreenUpdating .......)

  啟用

  Application.ScreenUpdating = True

  Application.DisplayStatusBar = True

  Application.Calculation = xlCalculationAutomatic '(自動)

  Application.EnableEvents = True

關閉：

  Application.ScreenUpdating = False

  Application.DisplayStatusBar = False

  Application.Calculation = xlCalculationManual '(手動)

  Application.EnableEvents = False