如何在保存前在Word中运行宏？

Question

如何在每次保存文档之前使Microsoft Word运行VBA宏？可以在不将宏添加到文档本身的情况下完成吗？

Answer 1

您可以Document_Open使用WithEvents变量和常规方法名称(VariableName_EventName)订阅应用程序事件.也适用于模板.

你可以把这个代码转换成ThisDocument对象,或使一个单独的类模块描述这里.

Private WithEvents App As Word.Application

Private Sub Document_Open()
Set App = Word.Application
End Sub

Private Sub App_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean)
MsgBox("BeforeSave")
End Sub

所有申请活动的清单.