Excel VBA マルチページのイベント

スポンサーリンク

マルチページのイベント一覧

イベント名 イベントの発生
AddControl 実行時にAddメソッドでコントロールが追加されたとき
BeforeDragOver 「ドラッグ&ドロップ」したとき
BeforeDropOrPaste データをドロップするか貼り付けるとき
Change マルチページのページを変更したとき
Click マウス左ボタンでクリックして離したとき
DblClick マウス左ボタンでダブルクリックして離したとき
Enter マルチページが他のコントロールからフォーカスを受け取る直前
Error エラー情報を呼び出し元プログラムに返すことができないとき
Exit マルチページがフォーカスを失い他のコントロールに移動する直前
KeyDown マルチページにフォーカスがあるときにキーを押したタイミング
KeyPress マルチページにフォーカスがあるときにキーが押されたあと
KeyUp マルチページにフォーカスがあるときに押されたキーが戻るとき
Layout マルチページに配置されたコントロールが移動したとき
MouseDown マルチページ上でマウスボタンが押されたとき
MouseMove マルチページ上にマウスポインターが移動したとき
MouseUp マルチページ上でマウスボタンをクリックしてボタンを離したとき
RemoveControl マルチページに設置されたコントロールが削除されたとき
Scroll マルチページ上のスクロールボックスに変更があったときに
Zoom マルチページの表示倍率が変更されたとき

マルチページのプロパティについては「マルチページのプロパティ」をご覧ください。


AddControl【アドコントロール】イベント

AddControl【アドコントロール】イベントは、マルチページにAdd【アド】メソッドによってコントロールが追加されたときに発生します。フォームが最初に読み込まれたときにAdd【アド】メソッドでコントロールが追加されたときは発生しません。

AddControl【アドコントロール】イベントの書式と引数の説明

Private Sub MultiPage_AddControl(ByVal Index As Long,
ByVal Control As MSForms.Control)

  • Index【インデックス】
    コントロールが追加されたページのインデックス番号を返します。最初のページ(左側)が0になります。
  • Control【コントロール】
    追加されたコントロールを返します。

BeforeDragOver【ビフォアドラッグオーバー】イベント

BeforeDragOver【ビフォアドラッグオーバー】イベントは、「ドラッグ&ドロップ」したときに発生します。

BeforeDragOver【ビフォアドラッグオーバー】イベントの書式と引数の説明

Private Sub MultiPage_BeforeDragOver(ByVal Index As Long,
ByVal Cancel As MSForms.ReturnBoolean,
ByVal Control As MSForms.Control,
ByVal Data As MSForms.DataObject,
ByVal X As Single,
ByVal Y As Single,
ByVal State As MSForms.fmDragState,
ByVal Effect As MSForms.ReturnEffect,
ByVal Shift As Integer)

  • Index【インデックス】
    ドラック&ドロップされたページのインデックス番号を返します。最初のページ(左側)が0になります。
  • Cancel【キャンセル】
    イベントの状態を設定します。既定値はFalseで「コントロール」がイベントを処理することを表します。Trueに設定した場合は「アプリケーション」がイベントを処理することを表します。
  • Control【コントロール】
    ドラッグされているコントロールを返します。
  • Data【データ】
    ドラッグ アンド ドロップ操作でドラッグされているデータ
  • X【エックス】
    マルチページが押された水平位置をポイント単位で単精度浮動小数点型 (Single)の値で返します。
  • Y【ワイ】
    マルチページが押された垂直位置をポイント単位で単精度浮動小数点型 (Single)の値で返します。
  • State【ステイツ】
    ドラッグされているデータの遷移状態を設定します。以下の定数を指定します。

    定数 内容
    fmDragStateEnter 0 マウス ポインターはターゲットの範囲の中にあります。
    fmDragStateLeave 1 マウス ポインターはターゲットの範囲の外にあります。
    fmDragStateOver 2 マウス ポインターは新しい位置にありますが
    同じターゲットの範囲の中にあります。
  • Effect【エフェクト】
    ドロップ ソースでサポートされる操作を設定します。

    設定値 内容
    fmDropEffectNone 0 ドロップ ソースをドロップ ターゲットに
    コピーも移動もしません。
    fmDropEffectCopy 1 ドロップ ソースをドロップ ターゲットに
    コピーします。
    fmDropEffectMove 2 ドロップ ソースをドロップ ターゲットに
    移動します。
    fmDropEffectCopyOrMove 3 ドロップ ソースをドロップ ターゲットに
    コピーまたは移動します。
  • Shift【シフト】
    キーが押されたときの「Shiht」キー、「Ctrl」キー、「Alt」キーが押されている状況を整数値で返します。すべて押されていないときは「0」を返します。複数選択されている場合は整数値を加算した値が返されます。

    戻り値 押されているキー
    1 「Shiht」キー
    2 「Ctrl」キー
    4 「Alt」キー

※このイベントは、マウス ポインターが有効なターゲットに入ったときターゲットから出たとき、またはターゲットの上にあるときにポインターを監視するために使用します。ドラッグ アンド ドロップ操作の実行中は、ユーザーがマウスを動かしたりマウス ボタンを押したり離したりすると、このイベントが発生します。このイベントを受け取るターゲット オブジェクトは、マウス ポインターの位置によって決まります。マウス ポインターの状態は、State 引数を調べることによって判定できます。


BeforeDropOrPaste【ビフォアドロップオーアールペースト】イベント

BeforeDropOrPaste【ビフォアドロップオーアールペースト】イベントは、ユーザーがマルチページにデータをドロップするか貼り付けようとすると発生します。

BeforeDropOrPaste【ビフォアドロップオーアールペースト】イベントの書式と引数の説明

Private Sub MultiPage_BeforeDropOrPaste(ByVal Index As Long,
ByVal Cancel As MSForms.ReturnBoolean,
ByVal Control As MSForms.Control,
ByVal Action As MSForms.fmAction,
ByVal Data As MSForms.DataObject,
ByVal X As Single,
ByVal Y As Single,
ByVal Effect As MSForms.ReturnEffect,
ByVal Shift As Integer)

  • Action【アクショオン】
    現在のキーボード設定に基づく保留中のドラッグ アンド ドロップ操作の結果を示します。

    定数 内容
    fmActionPaste 2 選択されているオブジェクトを
    ドロップ ターゲットに貼り付けます。
    fmActionDragDrop 3 ユーザーがオブジェクトをソースから
    ドロップ ターゲットにドラッグして
    ドロップ ターゲットにドロップしたことを示します。

    他の設定値については
    BeforeDragOver【ビフォアドラッグオーバー】イベントをご覧ください。


Change【チェンジ】イベント

Change【チェンジ】イベントは、マルチページのページを変更したときに発生します。

Change【チェンジ】イベントの書式

Private Sub MultiPage_Change()


Click【クリック】イベント

Click【クリック】 イベントは、マウス ポインターをマルチページの上に置きマウス左ボタンをクリックして離したときに発生します。既定のイベントになります。

Click【クリック】イベントの書式と引数の説明

Private Sub MultiPage_Click(ByVal Index As Long)

  • Index【インデックス】
    クリックされたページのインデックス番号を返します。最初のページ(左側)が0から始まります。

DblClick【ダブルクリック】イベント

DblClick【ダブルクリック】 イベントは、マウス ポインターをマルチページの上に置きシステムで設定されているダブルクリックの間隔内にマウスの左ボタンを押してから離す動作を2 回続けて行ったときに発生します。

DblClick【ダブルクリック】イベントの書式と引数の説明

Private Sub MultiPage1_DblClick(ByVal Index As Long,
ByVal Cancel As MSForms.ReturnBoolean)

  • Index【インデックス】
    クリックされたページのインデックス番号を返します。最初のページ(左側)が0から始まります。
  • Cancel【キャンセル】
    Trueを設定した場合は「アプリケーション」がイベントを処理することを表します。

Enter【エンター】イベント

Enter【エンター】イベントは、マルチページが他のコントロールからフォーカスを受け取る直前に発生します。

Enter【エンター】イベントの書式

Private Sub MultiPage_Enter()


Error【エラー】イベント

Error【エラー】 イベントは、マルチページがエラーを検出しエラー情報を呼び出し元プログラムに返すことができないときに発生します。

Error【エラー】イベントの書式と引数の説明

Private Sub UserForm_Error(ByVal Index As Long,
ByVal Number As Integer,
ByVal Description As MSForms.ReturnString,
ByVal SCode As Long,
ByVal Source As String,
ByVal HelpFile As String,
ByVal HelpContext As Long,
ByVal CancelDisplay As MSForms.ReturnBoolean)

  • Index【インデックス】
    エラーが検出されたページのインデックス番号を返します。最初のページ(左側)が0になります。
  • Number【ナンバー】
    コントロールがエラーの識別に使用する一意の値を指定します。
  • Description【ディスクリプション】
    エラーの説明です。
  • SCode【エスコード】
    エラーの OLE ステータス コードを指定します。
  • Source【ソース】
    イベントを生成したコントロールを示す文字列です。
  • HelpFile【ヘルプファイル】
    エラーを説明しているヘルプ ファイルの完全修飾パス名を指定します。
  • HelpContext【ヘルプコンテキスト】
    エラーの説明が含まれるヘルプ ファイル トピックのコンテキスト ID を指定します。
  • CancelDisplay【キャンセルディスプレイ】
    メッセージ ボックスにエラー文字列を表示するかどうかを指定します。既定値はFalseで表示しません。表示する場合はTrueを指定します。

Exit【エグジット】イベント

Exit【エグジット】イベントは、マルチページがフォーカスを失い他のコントロールにフォーカスが移動する直前に発生します。

Exit【エグジット】イベントの書式と引数の説明

Private Sub MultiPage_Exit(ByVal Cancel As MSForms.ReturnBoolean)

  • Cancel【キャンセル】
    Trueを設定するとアプリケーションがイベントを処理しフォーカスは現在のコントロールに保持されることを示します。

KeyDown【キーダウン】イベント

KeyDown 【キーダウン】イベントは、マルチページにフォーカスがある状態で、キーを押したタイミングで発生します。

KeyDown【キーダウン】イベントの書式と引数の説明

Private Sub MultiPage_KeyDown(ByVal KeyCode As MSForms.ReturnInteger,
ByVal Shift As Integer)

  • KeyCode【キーコード】
    押されたキーを整数値で返します。

    戻り値 押されたキー
    1 左マウスボタン
    2 マウスの右ボタン
    3 CANCELキー
    4 マウスの中ボタン
    8 バックスペースキー
    9 Tabキー
    12 クリアキー
    13 キーを入力してください
    16 シフトキー
    17 CTRLキー
    18 MENUキー
    19 PAUSEキー
    20 CAPS LOCKキー
    27 ESCキー
    32 スペースバーキー
    33 ページアップキー
    34 ページダウンキー
    35 ENDキー
    36 HOMEキー
    37 左矢印キー
    38 上向き矢印キー
    39 右矢印キー
    40 下矢印キー
    41 SELECTキー
    42 PRINT SCREENキー
    43 EXECUTEキー
    44 SNAPSHOTキー
    45 INSキー
    46 DELキー
    47 HELPキー
    65 Aキー
    66 Bキー
    67 Cキー
    68 Dキー
    69 Eキー
    70 Fキー
    71 Gキー
    72 Hキー
    73 Iキー
    74 Jキー
    75 Kキー
    76 Lキー
    77 Mキー
    78 Nキー
    79 Oキー
    80 Pキー
    81 Qキー
    82 Rキー
    83 Sキー
    84 Tキー
    85 Uキー
    86 Vキー
    87 Wキー
    88 Xキー
    89 Yキー
    90 Zキー
    48 0キー
    49 1キー
    50 2キー
    51 3キー
    52 4キー
    53 5キー
    54 6キー
    55 7キー
    56 8キー
    57 9キー
    96 0キー
    97 1キー
    98 2キー
    99 3キー
    100 4キー
    101 5キー
    102 6キー
    103 7キー
    104 8キー
    105 9キー
    106 (*)キー
    107 (+)キー
    108 ENTERキー
    109 ( – )キー
    110 (。)キー
    111 (/)キー
    112 F1キー
    113 F2キー
    114 F3キー
    115 F4キー
    116 F5キー
    117 F6キー
    118 F7キー
    119 F8キー
    120 F9キー
    121 F10キー
    122 F11キー
    123 F12キー
    124 F13キー
    125 F14キー
    126 F15キー
    127 F16キー
    144 NUM LOCKキー
  • Shift【シフト】
    キーが押されたときの
    「Shiht」キー、「Ctrl」キー、「Alt」キーが
    押されている状況を整数値で返します。
    すべて押されていないときは「0」を返します。
    複数選択されている場合は整数値を加算した値が返されます。

    戻り値 押されているキー
    1 「Shiht」キー
    2 「Ctrl」キー
    4 「Alt」キー

KeyPress【キープレス】イベント

KeyPress 【キープレス】イベントは、マルチページにフォーカスがある状態でANSI コードに対応するキーまたはキーの組み合わせを押して離したときに発生します。

KeyPress【キープレス】イベントの書式と引数の説明

Private Sub MultiPage_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

  • KeyAscii【キーアスキー】
    ANSI キー コードを返します。引数 KeyAscii に 0 を設定するとキー操作がキャンセルされオブジェクトはキーが押されたことを認識しません。

KeyUp【キーアップ】イベント

KeyUp【キーアップ】 イベントは、マルチページにフォーカスがある状態で、キーを押して離したときに発生します。

KeyUp【キーアップ】イベントの書式と引数の説明

Private Sub MultiPage_KeyUp(ByVal KeyCode As MSForms.ReturnInteger,
ByVal Shift As Integer)

KeyDown【キーダウン】イベントの設定値を参照してください

Layout【レイアウト】イベント

Layout【レイアウト】イベントは、マルチページに配置されたコントロールが移動したときに発生します。

Layout【レイアウト】イベントの書式と引数の説明

Private Sub MultiPage_Layout(ByVal Index As Long)

  • Index【インデックス】
    配置されたコントロールが移動したページのインデックス番号を返します。最初のページ(左側)が0から始まります。

MouseDown【マウスダウン】イベント

MouseDown【マウスダウン】イベントは、マウスポインターがマルチページ上にあるときにマウスボタンを押したとき発生します。

MouseDown【マウスダウン】イベントの書式と引数の説明

Private Sub MultiPage_MouseDown(ByVal Index As Long,
ByVal Button As Integer,
ByVal Shift As Integer,
ByVal X As Single,
ByVal Y As Single)

  • Index【インデックス】
    フォーカスのあるページのインデックス番号を返します。最初のページ(左側)が0から始まります。
  • Button【ボタン】
    押されたボタンを整数値で返します。

    戻り値 押されたボタン
    1 マウス左ボタン
    2 マウス右ボタン
    4 マウス中央ボタン
  • Shift【シフト】
    マウスボタンが押されたときの「Shiht」キー、「Ctrl」キー、「Alt」キーが押されている状況を整数値で返します。すべて押されていないときは「0」を返します。複数選択されている場合は整数値を加算した値が返されます。

    戻り値 押されているキー
    1 「Shiht」キー
    2 「Ctrl」キー
    4 「Alt」キー
  • X【エックス】
    フォームが押された水平位置をポイント単位で単精度浮動小数点型 (Single)の値で返します。
  • Y【ワイ】
    フォームが押された垂直位置をポイント単位で単精度浮動小数点型 (Single)の値で返します。

MouseMove【マウスムーブ】イベント

MouseMove【マウスムーブ】イベントは、マウスポインターがマルチページ上に移動したとき発生します。

MouseMove【マウスムーブ】イベントの書式と引数の説明

Private Sub MultiPage_MouseMove(ByVal Index As Long,
ByVal Button As Integer,
ByVal Shift As Integer,
ByVal X As Single,
ByVal Y As Single)

MouseDown【マウスダウン】イベントと同じなので参照してください。

MouseUp【マウスアップ】イベント

MouseUp【マウスアップ】イベントは、マルチページ上でマウスボタンをクリックしてボタンを離したときに発生します。

MouseUp【マウスアップ】イベントの書式と引数の説明

Private Sub MultiPage_MouseUp(ByVal Index As Long,
ByVal Button As Integer,
ByVal Shift As Integer,
ByVal X As Single,
ByVal Y As Single)

MouseDown【マウスダウン】イベントと同じなので参照してください。

RemoveControl【リムーブコントロール】イベント

RemoveControl【リムーブコントロール】イベントは、マルチページ上に設置されたコントロールが削除されたときに発生します。

RemoveControl【リムーブコントロール】イベントの書式と引数の説明

Private Sub MultiPage_RemoveControl(ByVal Index As Long,
ByVal Control As MSForms.Control)

  • Index【インデックス】
    削除されたコントロールがあるページのインデックス番号を返します。最初のページ(左側)が0から始まります。
  • Control【コントロール】
    削除されたコントロールを返します。

Scroll【スクロール】イベント

Scroll【スクロール】イベントは、マルチページ上に設置されたスクロールボックスの位置が変更された場合に発生します。

Scroll【スクロール】イベントの書式と引数の説明

Private Sub MultiPage_Scroll(ByVal Index As Long,
ByVal ActionX As MSForms.fmScrollAction,
ByVal ActionY As MSForms.fmScrollAction,
ByVal RequestDx As Single,
ByVal RequestDy As Single,
ByVal ActualDx As MSForms.ReturnSingle,
ByVal ActualDy As MSForms.ReturnSingle)

  • Index【インデックス】
    アクティブページのインデックス番号を返します。最初のページ(左側)が0から始まります。
  • ActionX【アクションエックス】
    水平方向で発生した操作を整数値で返します。
  • ActionY【アクションワイ】
    垂直方向で発生した操作を整数値で返します。

    ActionX,Yの戻り値一覧
    戻り値 内容
    0 変更は発生していません。
    1 キーボードの上矢印キーまたは左矢印キーを
    押すことによるスクロール バーの移動
    2 キーボードの下矢印キーまたは右矢印キーを
    押すことによるスクロール バーの移動
    3 キーボードの Page Up キーを押すことによる
    スクロール バーの移動
    4 キーボードの Page Down キーを押すことによる
    スクロール バーの移動
    5 垂直スクロール バーの上端
    水平スクロール バーの左端
    6 垂直スクロール バーの下端
    水平スクロール バーの右端
    8 ScrollTopプロパティまたは
    ScrollLeftプロパティの値が変化しました。
    9 コントロールがコンテナーにスクロールを要求しました。
    10 ユーザーが別のコントロールに移動しました
  • RequestDx【リクエストディエックス】
    水平方向にスクロール バーを移動する距離です (ポイント単位)
  • RequestDy【リクエストディワイ】
    垂直方向にスクロール バーを移動する距離です (ポイント単位)
  • ActualDx【アクチュアルディエックス】
    スクロール バーが水平方向に移動した距離です (ポイント単位)
  • ActualDy【アクチュアルディワイ】
    スクロール バーが垂直方向に移動した距離です (ポイント単位)

Zoom【ズーム】イベント

Zoom【ズーム】イベントは、マルチページの表示倍率を変更したとき発生します。

Zoom【ズーム】イベントの書式と引数の説明

Private Sub MultiPage_Zoom(ByVal Index As Long,
Percent As Integer)

  • Index【インデックス】
    表示倍率を変更したページのインデックス番号を返します。最初のページ(左側)が0から始まります。
  • Percent【パーセント】
    表示倍率を整数値(%)で返します。

以上で、マルチページのイベントについての解説を終了します。ありがとうございました。

スポンサーリンク

関連記事・広告