羅傑小沙

EXCEL VBA的效率不好，所以被人詬病，但VBA主要用來改善工作時的煩鎖，對我而言，差多少秒數，其實影響不大，不過都自學了VBA，那就簡單的歸納，有沒有什麼可以增加執行效率的方法：

（一）關閉螢幕更新

Application.ScreenUpdate = False    '關閉螢幕更新

On error Goto ErrScn

ErrScn:

Aplication.ScreenUpdate = Ture   '開啟螢幕更新

說明：程式碼結束之前，要記得打開更新，上述加了error時，要在執行時，要有正確的錯誤處理，以免無法知道錯誤。

（二）關閉狀態列的顯示

Aplication.DisplayStatusBar = False

Aplication.DisplayStatusBar = True

（三）關閉狀態而的內容顯示

Aplication.StatusBar = False

（四）計算方式調整為手動

Aplication.Calculation = xlCalculationManual

Aplication.Calculation = xlCalculationAutomatic