VBAサンプル集
マクロVBAの開始時と終了時に指定しておくべきApplicationのプロパティ

マクロVBAの実行中に画面表示の更新を止めて、マクロを高速に処理されるようにします。
マクロの先頭の方で、
ScreenUpdating = False
こうすることで、マクロ実行中の画面表示が更新されないので、
その画面更新にかかる時間が不要になり、それだけ早く処理が終了します。
マクロが終了すると、自動的に画面表示が更新されますが、
マクロの最期で、
ScreenUpdating = True
として、明示的に書いておく方が良いでしょう。

計算モードを変更します。
設定値

Calculation = xlCalculationManual
この記述をすることで、
これ以降、自動計算は行われなくなります。
この設定は、マクロ終了後も引き続き有効となりますので、
マクロVBA終了時に、
Calculation = xlCalculationAutomatic
これで自動計算に戻しておきます。

マクロVBA内で、ステータスバーを使用していなければ、不要です。
ステータス バーに文字列を設定します。
StatusBar = "文字列"
これで、ステータスバーに文字列が表示されます。
ステータス バーの文字列を既定値に戻すには、
StatusBar = False
とすることで、それまでに表示していた文字列は消されます。

イベント処理を使用しない場合は、不要です。
Application.EnableEvents = False
これで、新たなイベント発生が停止されます。
Worksheetのイベントプロシージャー｜マクロVBA入門
特に、WorksheeetのChangeを使用する場合、
イベント発生を停止しておかないと、VBAでセル値を変更しても新たにWorksheet_Changeが実行されてしまいます。
結果的に、イベントの連鎖が起こり、無限ループが発生してエラーとなります。
この設定は、マクロ終了後も引き続き有効となりますので、
マクロVBA終了時に、
Application.EnableEvents = True
これで、新たなイベント発生が発生するようになります。
これを入れ忘れると、プロシージャー終了後も新たなイベントが発生しなくなります。

マウスポインターの形状を設定します。
必須というほど重要ではありません。
ただし、マクロVBA実行中にカーソルが頻繁にちらつくような場合は、この設定により処理速度が向上します。

Application.Cursor = xlWait
これでマウスポインターは砂時計型ポインターになります。
この設定は、マクロ終了後も引き続き有効となりますので、
マクロVBA終了時に、
Application.Cursor = xlDefault
これで標準に戻しておきます。