Application.DocumentChange 事件

在创建新文档、打开已有文档或激活其他文档时发生。

语法

Private Sub 表达式_DocumentChange()

表达式 一个代表 Application 对象的变量，该对象是使用类模块中的事件声明的。

说明

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

示例

以下示例在文档焦点转移时，提示用户是否保存其他所有已打开的文档。为了使本示例能正常运行，以下代码必须放在一个类模块中，而且该类的实例必须正确地初始化。有关如何完成此操作的指导，请参阅使用 Application 对象事件。

示例代码

示例代码
`function Application_DocumentChange() { let intResponse let strName let doc intResponse = MsgBox("Save all other documents?", jsYesNo) if(intResponse == jsResultYes) { strName = ActiveDocument.Name for(let i = 1; i <= Documents.Count; i++) { doc = Documents.Item(i) if(doc.Name != strName) { doc.Save() } } } }`

function Application_DocumentChange() {
    let intResponse 
    let strName 
    let doc

    intResponse = MsgBox("Save all other documents?", jsYesNo)

    if(intResponse == jsResultYes) {
        strName = ActiveDocument.Name
        for(let i = 1; i <= Documents.Count; i++) {
            doc = Documents.Item(i)
            if(doc.Name != strName) {
                doc.Save()
            }
        }
    }
}

请参阅