[EXCELVBA]処理速度を上げる基本

これは絶対必須。

マクロの実行を早くするために以下の処理を行います。

'--------------------------------------------------------
'実行速度向上のため画面更新と自動計算を停止
Application.ScreenUpdating = False
ThisWorkbook.Sheets("選択画面").Cells(1, 1).Select　 '※１
ThisWorkbook.Sheets("選択画面").Activate　 '※２ 
Application.Calculation = xlCalculationManual
'-----------------------------------------------------------

 '実行速度向上のため画面更新と自動計算を再開----

 Application.ScreenUpdating = True

ThisWorkbook.Sheets("選択画面").Cells(1, 1).Select　 '※１
ThisWorkbook.Sheets("選択画面").Activate　 '※２ 

 Application.Calculation = xlCalculationAutomatic

'-----------------------------------------------------------

'※１ はなくてもいいですが、エクセル９７はコレがないとエラーになります
'※２ これはエクセルバージョンを問わず必須。