イベントの発生・無効をコントロール(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 |
実行結果
関連記事
-
-
シート見出しの表示・非表示(DisplayWorkbookTabs プロパティ)
シート見出しの表示・非表示(DisplayWorkbookTabs プロパティ) …
-
-
ブック作成時のシート数の取得・設定(SheetsInNewWorkbook プロパティ)
SheetsInNewWorkbook プロパティ Excel で新規ブックに自 …
-
-
共有ファイルを開いているユーザー情報を取得(UserStatus プロパティ)
共有ファイルを開いているユーザー情報を取得 UserStatus プロパティは、 …
-
-
セルのコメントを印刷(PageSetup.PrintComments プロパティ)
PageSetup.PrintComments プロパティ PageSetup. …
-
-
選択されているシートを参照する(SelectedSheets プロパティ)
SelectedSheets プロパティ 選択されているすべてのシートをあらわす …
-
-
シートが保護されているか確認(ProtectContents プロパティ)
ProtectContents プロパティ ワークシートが保護されているかどうか …
-
-
スクロール(LargeScroll メソッド、Smallscroll メソッド)
ワークシートをスクロールする ワークシートをスクロールするには、LargeScr …
-
-
印刷時、シート内のエラーをどう扱うかを設定(PrintErrors プロパティ)
PageSetup.PrintErrors プロパティ PageSetup.Pr …
-
-
印刷の倍率(拡大/縮小)(PageSetup.Zoom プロパティ)
PageSetup.Zoom プロパティ PageSetup.Zoom プロパテ …
-
-
新規ブック作成(Add メソッド)
新規にワークブックを作成する Workbooks コレクションの Add メソッ …
