Application.ProtectedViewWindowBeforeEdit イベント (Word)
指定した [保護されたビュー] ウィンドウのドキュメントで編集が有効になる直前に発生します。
構文
expression. ProtectedViewWindowBeforeEdit
( _PvWindow_
, _Cancel_
)
式Application オブジェクトを返す式。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
PvWindow | 必須 | ProtectedViewWindow | 編集が有効になっているドキュメントを含む [保護されたビュー] ウィンドウ。 |
Cancel | 必須 | Boolean | False イベントが発生します。 イベント プロシージャでこの引数に True を設定する場合編集が有効になっていないドキュメントで。 |
例
次のコード例では、[保護されたビュー] ウィンドウでドキュメントの編集を有効にする前に、ユーザーに対して "はい" または "いいえ" の応答を求めます。 このコードはクラス モジュールに配置する必要があり、このコード例を正しく動作させるには、クラスのインスタンスを正しく初期化する必要があります。 これを行う方法の詳細については、「 Application オブジェクトでイベントを使用する」を参照してください。
次のコード例では、アプリケーション変数 "App" を General Declarations に宣言し、その変数を Word の Application オブジェクトとして設定していることを前提としています。
Private Sub App_ProtectedViewWindowBeforeEdit(ByVal PvWindow As ProtectedViewWindow, Cancel As Boolean)
Dim intResponse As Integer
intResponse = MsgBox("Do you really " _
& "want to edit the document?", _
vbYesNo)
If intResponse = vbNo Then Cancel = True
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。