イベントの発生・無効をコントロール(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 |
実行結果
関連記事
-
-
ワークシートのコピー・移動(Copy メソッド Move メソッド)
Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …
-
-
0 を表示するかどうかを設定(DisplayZeros プロパティ)
DisplayZeros プロパティ DisplayZeros プロパティに、T …
-
-
ブックが互換モードで開いているか確認する(Excel8CompatibilityMode プロパティ)
ブックが互換モードで開いているか確認する Excel8Compatibility …
-
-
再計算(Calculation, EnableCalculation, Calculate)
ワークブックやシートの再計算 通常、Excel では、自動的に再計算が行われる設 …
-
-
ブックを開く(Open メソッド)
ブックを開く(Open メソッド) ブックを開くには、Workbooks コレク …
-
-
ブックを参照(Workbooks プロパティ,Windows プロパティ)
アクティブなワークブックを参照 現在使用中のワークブック、複数ある場合は一番手前 …
-
-
ブックを閉じる(Close メソッド)
ブックを閉じる(Close メソッド) Close メソッド で、ブックを閉じる …
-
-
印刷設定を高速化(PrintCommunication プロパティ)
PrintCommunication プロパティ PrintCommunicat …
-
-
シート見出しの色を設定(Tab プロパティ)
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
-
-
ワークシートを参照する(Worksheets プロパティ)
Worksheets プロパティ Worksheets プロパティは、Works …
