通过

Document.New 事件 (Word)

  • 项目

在创建基于模板的新文档时发生。 只有当它存储在模板中，将运行 新建 事件的过程。

语法

表达式.**Private Sub Document_New'

表达 一个代表 Document 对象的变量。

备注

有关对 Document 对象使用事件的信息，请参阅 对 Document 对象使用事件。

示例

本示例询问用户是否要保存所有其他打开的文档，创建基于模板的新文档时。 (此过程存储在模板，而不是文档的 状态报告 的类模块中)。

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

另请参阅

Document 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。