VBA技術解説
ScreenUpdating=False時にエラー停止後にシートが固まったら

ExcelマクロVBAの問題点と解決策、VBAの技術的解説
最終更新日:2017-11-21

ScreenUpdating=False時にエラー停止後にシートが固まったら

マクロVBAでは、処理の高速化や画面チラつきを防ぐために、
Application.ScreenUpdating = False
これを入れていることが多いと思います。


これが入っていると、マクロVBAがエラーで停止して、そこで「リセット」した場合に、
Excelシートをクリック出来なくなったり、シートタブの切り替えができなくなってしまう場合があります。
必ずこのような状態になるわけではなく、ある程度大きなマクロVBAの時にはなりやすいといった感じです。

原因としては、
Application.ScreenUpdating = True
これが行われないことによるわけですが、
そもそも通常は、マクロ停止時に自動的にTrueに戻るはずなのですが、これが戻らない場合があるという事になります。

複数ブックを開いているような場合は、
マウスクリックでブックの切り替えをしていると戻る場合もありますが、確実に戻るわけではありません。
そこで、こまような状態になってしまった場合は、
Application.ScreenUpdating = True
これを実行すれば良いことになります。


では、これをどうやって実行するかという事になりますが、
そもそもマクロ作成時に、マクロ終了処理のプロシージャーを作っておく事をお勧めします。

Sub マクロ終了()
  Application.StatusBar = False          'ステータスバーを消す
  Application.Calculation = xlCalculationAutomatic '計算を自動に
  Application.DisplayAlerts = True        '確認メッセージを開始
  Application.EnableEvents = True         'イベントを開始
  Application.ScreenUpdating = True       '画面描画を開始
End Sub


戻すApplicationのプロパティは、適宜変更してください。
このようにマクロが作ってあれば、これを実行すればそれで済みます。
このようなプロシージャーがあればそれで問題ありませんが、無かった場合はどうするかです。


イミディエイト ウィンドウを使いましょう!
イミディエイトで、
Application.ScreenUpdating = True
これを入力してEnterすればよいのです。
上のコードは、入力補助を使ったので、先頭が大文字になっていますが、
application.screenUpdating=true
このようにベタ打ちでも構いません。
ですが、余程タイピングに自身があれば別ですが、Ctrl+Spaceから入力補助を使った方が早いでしょうね。


入力補助について

Ctrl+Spaceを押すと、その時点で入力できるコードが候補表示されます。
行の先頭なら、全てが表示されることになります。

そして、オブジェクトに続けて.(ピリオド)を入力すると、自動メンバー表示されます。
ただし、「ツール」→「オプション」で「自動メンバー表示」にチェックがついていることが必要です。
このような入力補助を使うと、
Application.ScreenUpdating = True
これを入力するには、
Ctrl+Space
ap

Tab
.s
Tab
=t
Enter
このようなタイピングで入力が完了します。



イミディエイト ウィドウ

イミディエイト ウィドウは以下のような場合に使用します。

・記述したコードを実行する
・プロシージャを呼び出す
・プログラム実行中に、変数の値を調べたり値を代入する
・プログラム実行中に、プロパティの値を調べたり変更したりする
・プログラム実行中に、デバッグ情報の出力を表示する

値を調べる場合は、?に続けて、変数やプロパティを入力してEnterします。
コードを実行する場合は、そのままVBAコードを入力してEnterします。



Application.ScreenUpdating = Falseについての注意点

グラフ、画像、オートシェイプ等を扱う場合は、
Application.ScreenUpdating = False
になっていると、意図した結果にならない場合が結構あります。
そのような場合は、
対象シートをアクティブにして、
Application.ScreenUpdating = True
この状態になるようにマクロVBAでコード記述してやると、問題の多くが解決することが多いです。




同じテーマ「マクロVBA技術解説」の記事

フォルダー・ファイル・ブック・シートの文字制限
Excel2013におけるScreenUpdatingの問題点
Dir関数の制限について
よくあるVBA実行時エラーの解説と対応
Application.Goto使用時の注意
ScreenUpdating=False時にエラー停止後にシートが固まったら
標準スタイル違いの問題点:標準フォント複写、列幅をピクセルで合わせる
VBAでエラー行位置(行番号)を取得できるErl関数
WorksheetFunction.Matchで配列を指定した場合の制限について
VBAでシート関数使用時の配列要素数制限


新着記事NEW ・・・新着記事一覧を見る

VBA100本ノック 18本目:名前定義の削除|VBA練習問題100(11月6日)
VBA100本ノック 17本目:重複削除(ユニーク化)|VBA練習問題100(11月6日)
VBA100本ノック 16本目:無駄な改行を削除|VBA練習問題100(11月5日)
VBA100本ノック 15本目:シートの並べ替え|VBA練習問題100(11月4日)
VBA100本ノック 14本目:社外秘シート削除|VBA練習問題100(11月3日)
VBA100本ノック 13本目:文字列の部分フォント|VBA練習問題100(11月1日)
VBA100本ノック 12本目:セル結合を解除|VBA練習問題100(10月31日)
VBA100本ノック 11本目:セル結合の警告|VBA練習問題100(10月30日)
VBA100本ノック 10本目:行の削除|VBA練習問題100(10月29日)
VBA100本ノック 9本目:フィルターコピー|VBA練習問題100(10月28日)


アクセスランキング ・・・ ランキング一覧を見る

1.最終行の取得(End,Rows.Count)|VBA入門
2.RangeとCellsの使い方|VBA入門
3.変数宣言のDimとデータ型|VBA入門
4.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
5.マクロって何?VBAって何?|VBA入門
6.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
7.繰り返し処理(For Next)|VBA入門
8.セルに文字を入れるとは(Range,Value)|VBA入門
9.とにかく書いてみよう(Sub,End Sub)|VBA入門
10.マクロはどこに書くの(VBEの起動)|VBA入門




このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。



このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
本文下部へ