ProtectedViewWindowBeforeEdit イベント (Excel)Application.ProtectedViewWindowBeforeEdit event (Excel)

指定された [保護されたビュー] ウィンドウでブックの編集が有効になる直前に発生します。Occurs immediately before editing is enabled on the workbook in the specified Protected View window.

構文Syntax

ProtectedViewWindowBeforeEdit(pvwCancel)expression.ProtectedViewWindowBeforeEdit (Pvw, Cancel)

expression**Application** オブジェクトを 表す変数。expression A variable that represents an Application object.

パラメーターParameters

名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
PvwPvw 必須Required ProtectedViewWindowProtectedViewWindow 編集が有効になっているブックを含む [保護されたビュー] ウィンドウ。The Protected View window that contains the workbook that is enabled for editing.
CancelCancel 必須Required BooleanBoolean イベントが発生するときは False です。False when the event occurs. イベント プロシージャでこの引数を True に設定すると、ブックの編集は有効になりません。If the event procedure sets this argument to True, editing is not enabled on the workbook.

戻り値Return value

なしNothing

Example

次のコード例では、[保護されたビュー] ウィンドウでブックの編集を有効にする前に、ユーザーに yes または no の応答を求めるメッセージを表示します。The following code example prompts the user for a yes or no response before enabling editing on a workbook in a Protected View window. このコードはクラスモジュールに配置する必要があり、クラスのインスタンスは正しく初期化されている必要があります。This code must be placed in a class module, and an instance of the class must be correctly initialized.

applicationオブジェクトでイベントプロシージャを使用する方法の詳細については、「 application オブジェクトでイベントを使用する」を参照してください。For more information about how to use event procedures with the Application object, see Using events with the Application object.

Private Sub App_ProtectedViewWindowBeforeEdit(ByVal Pvw As ProtectedViewWindow, Cancel As Boolean) 
 Dim intResponse As Integer 
 
 intResponse = MsgBox("Do you really " _ 
 & "want to edit the workbook?", _ 
 vbYesNo) 
 
 If intResponse = vbNo Then Cancel = True 
End Sub

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.