[ＶＢＡ]画面描画を停止して速度アップする方法
（１）マクロ開始時
‘描画停止
Application.ScreenUpdating = False
‘カーソルを砂時計にする
Application.Cursor = xlWait
（２）マクロ終了時
‘描画再開
Application.ScreenUpdating = True
‘カーソルを元に戻す
Application.Cursor = xlDefault
これはマクロの内容に関わらず使えて、かつ効果が大きいと思います。一時的に描画したい場合は、描画を再開したい段階で（２）を実行し、再度描画を止めるときに（１）を実行する。