Application.DocumentBeforeClose イベント (Word)

開いている文書が閉じる直前に発生します。

注:

別の文書に埋め込まれている文書を操作している場合、このイベントは発生しません。

構文

プライベート サブ 式 'DocumentBeforeClose** (Doc As Document**、 Cancel As Boolean)

式 クラス モジュール内のイベントを使用して宣言された Application オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
Doc 必須 document 閉じられる文書です。
Cancel 必須 Boolean False イベントが発生します。 イベント プロシージャでこの引数に True を設定する場合、プロシージャが終了すると、文書は閉じられません。

注釈

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

例

この例では、ドキュメントを閉じる前に、ユーザーに Yes または No の応答を求めます。 このコードはクラスモジュールに配置する必要があり、このサンプルが動作するには、クラスのインスタンスが正しく初期化されている必要があります。この方法については、 Application オブジェクトでイベントを使用する を参照してください。

Public WithEvents appWord as Word.Application 
 
Private Sub appWord_DocumentBeforeClose _ 
        (ByVal Doc As Document, _ 
        Cancel As Boolean) 
 
    Dim intResponse As Integer 
 
    intResponse = MsgBox("Do you really " _ 
        & "want to close the document?", _ 
        vbYesNo) 
 
    If intResponse = vbNo Then Cancel = True 
End Sub

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

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

  • Last updated on