エクスプローラーがユーザーによって最大化されると発生します。
構文
式。
BeforeMaximize( _Cancel_ )
式エクスプローラー オブジェクトを表す変数。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| Cancel | 必須 | Boolean | False イベントが発生します。 イベント プロシージャでこの引数に True を設定する場合、操作は完了せず、エクスプ ローラーが最大化されていません。 |
注釈
このイベントは開始された後で取り消すことができます。
例
次の Microsoft Visual Basic for Applications (VBA) の例では、現在のウィンドウを最大化する前に、警告メッセージをユーザーに表示します。 ユーザーが [ はい] をクリックすると、エクスプローラーは最大化されます。 サンプル コードは ThisOutlookSession などのクラス モジュールに配置し、イベント プロシージャを Microsoft Outlook で呼び出す前に Initialize_Handler() サブルーチンを呼び出す必要があります。
Public WithEvents myOlExp As Outlook.Explorer
Sub Initialize_Handler()
Set myOlExp = Application.ActiveExplorer
End Sub
Private Sub myOlExp_BeforeMaximize(Cancel As Boolean)
'Prompts the user before maximizing the explorer
Dim lngAns As Long
lngAns = MsgBox("Are you sure you want to maximize the current window?", vbYesNo)
If lngAns = vbYes Then
Cancel = False
Else
Cancel = True
End If
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。