Application.ProtectedViewWindowBeforeClose イベント (Excel)

[保護されたビュー] ウィンドウが閉じる直前、または [保護されたビュー] ウィンドウ内のブックが閉じる直前に発生します。

構文

式。ProtectedViewWindowBeforeClose (Pvw,Reason, Cancel)

expressionApplication オブジェクトを 表す変数。

パラメーター

名前	必須 / オプション	データ型	説明
Pvw	必須	ProtectedViewWindow	閉じられた [保護されたビュー] ウィンドウを表すオブジェクト。
理由	必須	XlProtectedViewCloseReason	[保護されたビュー] ウィンドウが閉じられる理由を示す定数。
Cancel	必須	Boolean	イベントが発生すると、 False が渡されます。 イベント プロシージャでこの引数を True に設定すると、プロシージャが終了したときにこのウィンドウは閉じません。

戻り値

なし

例

次のコード例では、[保護されたビュー] ウィンドウを閉じる前に、ユーザーに対して "はい" または "いいえ" の応答を求めます。 このコードはクラス モジュールに配置する必要があり、そのクラスのインスタンスを正しく初期化する必要があります。

Application オブジェクトでイベント プロシージャを使用する方法の詳細については、「 Application オブジェクト でのイベントの使用」を参照してください。

Private Sub App_ProtectedViewWindowBeforeClose(ByVal Pvw as ProtectedViewWindow, _ 
 Reason as XlProtectedViewCloseReason, Cancel as Boolean) 
 a = MsgBox("Do you really want to close the Protected View window?", _ 
 vbYesNo) 
 If a = vbNo Then Cancel = True 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。