Application.DocumentBeforeSave イベント (Word)

開いている文書が保存される前に発生します。

構文

式。DocumentBeforeSave (DocAs Document**、 SaveAsUIAs Boolean、 CancelAs Boolean)

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

パラメーター

名前 必須 / オプション データ型 説明
Doc 必須 Document 保存される文書です。
SaveAsUI 必須 ブール型 (Boolean) True の 場合は、[名前を 付けて保存] ダイアログ ボックスが表示されると、 保存コマンドへの応答で、新しいドキュメントを保存するかどうかまたは 名前を付けて保存コマンドへの応答または SaveAsまたは SaveAs2メソッドに応答します。
Cancel 必須 Boolean False イベントが発生します。 イベント プロシージャでこの引数に True を設定する場合、プロシージャが終了すると、ドキュメントは保存されません。

注釈

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

例

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

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

関連項目

Application オブジェクト

自動保存

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

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

  • Last updated on