次の方法で共有


Document.New イベント (Word)

テンプレートに基づいて新しいドキュメントを作成するときに発生します。 New イベント プロシージャは、テンプレートに格納されている場合にのみ実行されます。

構文

expression.**Private Sub Document_New'

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

注釈

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

次の使用例は、テンプレートに基づいて新しい文書が作成されたときに、他のすべての開いているドキュメントを保存するかどうかをユーザーに確認します。 (この手順は、文書ではなく、テンプレートの ThisDocument クラス モジュールに格納されます)。

Private Sub Document_New() 
 Dim intResponse As Integer 
 Dim strName As String 
 Dim docLoop As Document 
 
 intResponse = MsgBox("Save all other documents?", vbYesNo) 
 
 If intResponse = vbYes Then 
 strName = ActiveDocument.Name 
 For Each docLoop In Application.Documents 
 With docLoop 
 If .Name <> strName Then 
 .Save 
 End If 
 End With 
 Next docLoop 
 End If 
End Sub

関連項目

ドキュメント オブジェクト

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

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