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

スポンサーリンク
スポンサーリンク

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

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

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


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

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

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

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

設定値(引数)の説明

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

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【ステイツ】
    ドラッグされているデータの遷移状態を設定します。
    以下の定数を指定します。

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

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

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

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


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【アクショオン】
    現在のキーボード設定に基づく
    保留中のドラッグ アンド ドロップ操作の結果を示します。

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

    他の設定値については
    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マウスの右ボタン
    3CANCELキー
    4マウスの中ボタン
    8バックスペースキー
    9Tabキー
    12クリアキー
    13キーを入力してください
    16シフトキー
    17CTRLキー
    18MENUキー
    19PAUSEキー
    20CAPS LOCKキー
    27ESCキー
    32スペースバーキー
    33ページアップキー
    34ページダウンキー
    35ENDキー
    36HOMEキー
    37左矢印キー
    38上向き矢印キー
    39右矢印キー
    40下矢印キー
    41SELECTキー
    42PRINT SCREENキー
    43EXECUTEキー
    44SNAPSHOTキー
    45INSキー
    46DELキー
    47HELPキー
    65Aキー
    66Bキー
    67Cキー
    68Dキー
    69Eキー
    70Fキー
    71Gキー
    72Hキー
    73Iキー
    74Jキー
    75Kキー
    76Lキー
    77Mキー
    78Nキー
    79Oキー
    80Pキー
    81Qキー
    82Rキー
    83Sキー
    84Tキー
    85Uキー
    86Vキー
    87Wキー
    88Xキー
    89Yキー
    90Zキー
    480キー
    491キー
    502キー
    513キー
    524キー
    535キー
    546キー
    557キー
    568キー
    579キー
    960キー
    971キー
    982キー
    993キー
    1004キー
    1015キー
    1026キー
    1037キー
    1048キー
    1059キー
    106(*)キー
    107(+)キー
    108ENTERキー
    109( – )キー
    110(。)キー
    111(/)キー
    112F1キー
    113F2キー
    114F3キー
    115F4キー
    116F5キー
    117F6キー
    118F7キー
    119F8キー
    120F9キー
    121F10キー
    122F11キー
    123F12キー
    124F13キー
    125F14キー
    126F15キー
    127F16キー
    144NUM 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垂直スクロール バーの下端
    水平スクロール バーの右端
    8ScrollTopプロパティまたは
    ScrollLeftプロパティの値が変化しました。
    9コントロールがコンテナーにスクロールを要求しました。
    10ユーザーが別のコントロールに移動しました
  • RequestDx【リクエストディエックス】
    水平方向にスクロール バーを移動する距離です (ポイント単位)
  • RequestDy【リクエストディワイ】
    垂直方向にスクロール バーを移動する距離です (ポイント単位)
  • ActualDx【アクチュアルディエックス】
    スクロール バーが水平方向に移動した距離です (ポイント単位)
  • ActualDy【アクチュアルディワイ】
    スクロール バーが垂直方向に移動した距離です (ポイント単位)

Zoom【ズーム】イベント

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

Zoom【ズーム】イベントの書式

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


設定値(引数)の説明

  • Index【インデックス】
    表示倍率を変更したページの
    インデックス番号を返します。

    最初のページ(左側)が0から始まります。
  • Percent【パーセント】
    表示倍率を整数値(%)で返します。

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

スポンサーリンク
スポンサーリンク

フォローする

スポンサーリンク
スポンサーリンク