画面の更新を停止(ScreenUpdating プロパティ)
画面の更新を停止
マクロを実行すると、画面が更新されます。これにより、実行速度が遅くなったり、画面がちらついたりします。ScreenUpdating プロパティ を False に設定すると、画面の更新が停止します。
【書式】
object.ScreenUpdating = boolean
引数・戻り値
- object ・・・ 対象となる Application オブジェクトを指定します。
- boolean ・・・ 画面の更新を停止するには、False 、画面を更新するには、True を指定します。
ScreenUpdating プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 |
Sub Sample_ScreenUpdating() '画面更新を停止 Application.ScreenUpdating = False 'ここの部分から画面更新を行わない ---------------------------------------- Range("A1").CurrentRegion.Select Selection.Copy Dim i As Integer For i = 1 To 3 With ActiveWorkbook.Worksheets.Add(after:=ActiveSheet) .Name = "新規 " & i .Paste ActiveWindow.Zoom = 150 End With Next i 'コピーモード・切り取りモードを解除 Application.CutCopyMode = False </div> 'ここの部分まで画面更新を行わない ---------------------------------------- '画面更新を再開 Application.ScreenUpdating = True End Sub |
実行結果
関連記事
-
-
指定した数のスペースを挿入する(Spc 関数)
指定した数のスペースを挿入 指定した数のスペースを挿入するには、Spc 関数を使 …
-
-
日付時刻:時・分・秒を取得(Hour、Minute、Second 関数)
日付時刻から時・分・秒を取得する関数 【書式】 time_hour = Hour …
-
-
VBA で正規表現を使う(RegExp オブジェクト)
RegExp オブジェクト VBA で正規表現を使うには、VBScript のR …
-
-
日付時刻:日付・時刻の間隔を取得( DateDiff 関数 )
DateDiff 関数の使い方 【書式】 result = DateDiff ( …
-
-
XlThemeColor 列挙型
XlThemeColor 列挙 定数 値 内容 xlThemeColorDark …
-
-
指定した数値に対応する選択肢の値・数式を返す(Choose 関数)
Choose 関数 の使い方 Choose 関数は、指定されたインデックス値(1 …
-
-
文字列:アルファベットを小文字または大文字に変換(LCase 関数,UCase 関数)
LCase 関数・UCase 関数 の使い方 【書式】 <アルファベットの大文字 …
-
-
文字列:指定した数の空白(スペース)からなる文字列を返す(Space 関数)
Space 関数 【書式】 result = Space ( number ) …
-
-
日付時刻:経過時間を取得( Timer 関数 )
Timer 関数の使い方 【書式】 result = Timer () 【戻り値 …
-
-
日付時刻:年・月・日を取得(Year、Month、Day 関数)
日付から年・月・日を取得する関数 【書式】 date_year = Year ( …
