はてなブックマークに追加
Facebookでシェア
Google+でシェア
Twitterでシェア
8.1 画面の更新を行う・停止する
マクロを使ってワークシートの編集をしているとき、特に何も指定しないとマクロで行っている書式の設定などの動きに合わせてワークシートの表示内容が更新されますが、この更新のON・OFFをApplication.ScreenUpdatingプロパティで切り替えることができます。

画面の描画をOFFにするときは、Falseを設定し、更新をONにするときはTrueを設定します。
使用例
Application.ScreenUpdatingの使用例です。例では、A1〜J30までの範囲にそれぞれ1〜300までの値を入れていますが、編集中の画面更新をOFFにし処理終了時に編集結果だけを表示(更新をON)しています。

Sub prcApplicationScreenUpdating()

    Dim rngCell As Range
    Dim lngCount As Long

    lngCount = 1

    '画面の描画をOFFにします
    Application.ScreenUpdating = False

    'セルA1〜J30に、1〜300の数値を入れます
    For Each rngCell In Range("A1:J30")
        
        rngCell.Value = lngCount
        lngCount = lngCount + 1
    
    Next

    '画面の描画をONに戻します
    Application.ScreenUpdating = True

End Sub
 ※このエクセルマクロはワークシート内へ記述するマクロです

ちなみに、画面描画をONで実行すると意外に処理時間がかかります。


Copyright(C) 1999-2015 結城圭介(Ver.3.51) All rights reserved