Application.ProtectedViewWindowBeforeClose イベント (Excel)

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

構文

ProtectedViewWindowBeforeClose (Pvw, 理由, キャンセル)

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

パラメーター

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

戻り値

なし

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

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 のサポートおよびフィードバックを参照してください。