イベントの発生・無効をコントロール(EnableEvents プロパティ)
2015/12/19
EnableEvents プロパティ
EnableEvents プロパティに True を指定するとイベントの発生を有効にし、False を指定するとイベントが発生しなくなります。
<取得>
object.EnableEvents
<設定>
object.EnableEvents = boolean
引数・戻り値
- object ・・・ 対象となる Application オブジェクトを指定します。
- boolean ・・・ True または、False を指定します。
通常、EnableEvents プロパティは、True です。一時的に、イベントを無効にしたい時に、False を指定します。
例えば、起動時にマクロが実行するブックをマクロを起動させずにブックを開きたい時などに使用します。
Application.EnableEvents = False
Workbook.Open(“Book1.xlsm”)
Application.EnableEvents = True
- object ・・・ 対象となる Application オブジェクトを指定します。
- boolean ・・・ True または、False を指定します。
通常、EnableEvents プロパティは、True です。一時的に、イベントを無効にしたい時に、False を指定します。
例えば、起動時にマクロが実行するブックをマクロを起動させずにブックを開きたい時などに使用します。
Application.EnableEvents = False
Workbook.Open(“Book1.xlsm”)
Application.EnableEvents = True
EnableEvents プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 |
Private Sub Worksheet_SelectionChange(ByVal Target As Range) ActiveCell.Value = Target.Address End Sub |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
Sub Sample_EnableEvents() With Worksheets("Sheet1") .Range("A5").Activate .Range("B3").Activate Application.EnableEvents = False .Range("A1").Activate Application.EnableEvents = True .Range("B7").Activate End With End Sub |
実行結果
関連記事
-
-
ワークシートの数を数える(Count プロパティ)
Count プロパティ 指定したWorksheets コレクションやSheets …
-
-
アクティブプリンタを変更(ActivePrinter プロパティ)
ActivePrinter プロパティ ActivePrinter プロパティを …
-
-
印刷設定(ページごとに異なるヘッダー・フッターを設定)Page オブジェクト・HeaderFooter オブジェクト
Page オブジェクト ページごとに異なるヘッダーおよびフッターを設定する場合、 …
-
-
印刷時、シート内のエラーをどう扱うかを設定(PrintErrors プロパティ)
PageSetup.PrintErrors プロパティ PageSetup.Pr …
-
-
計算精度を設定する(PrecisionAsDisplayed プロパティ)
PrecisionAsDisplayed プロパティ PrecisionAsDi …
-
-
ブックの変更が保存されているかを確認する(Saved プロパティ)
ブックの変更が保存されているかを確認する(Saved プロパティ) Saved …
-
-
スクロール(LargeScroll メソッド、Smallscroll メソッド)
ワークシートをスクロールする ワークシートをスクロールするには、LargeScr …
-
-
シート見出しの色を設定(Tab プロパティ)
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
-
-
ウィンドウの分割(Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ)
ウィンドウの分割と解除 ウィンドウ(ワークシート画面)を分割するには、Split …
-
-
印刷品質を設定(PageSetup.PrintQuality プロパティ)
PageSetup.PrintQuality プロパティ PageSetup.P …
