マクロ実行中の画面更新を止める
'更新を止める
Application.ScreenUpdating =
False
'更新を再開する
Application.ScreenUpdating =
True