vba - 保存事件后触发 MS Word 宏

Question

我的 MS Word 2007 模板有一个包含文件名的页脚。用户将打开模板并执行“另存为...”以制作他们的文档。

我希望页脚中显示的文件名立即更新为新文件名。

有没有AfterSaveEvent或者我可以用作 Hook 来启动执行更新的 VBA 脚本的东西？

或者有更简单的方法吗？

Answer 1

只需创建一个这样的宏(我相信如果包含在 Normal.dot 中它会更好)

Sub FileSaveAs()
'
' FileSaveAs Macro
' Saves a copy of the document in a separate file
'
Dialogs(wdDialogFileSaveAs).Show

'returns the name including the .doc extension 
 ChosenFileNameAndExtension = ActiveDocument.Name 'Or use .FullName

' Your code here

End Sub

只要用户选择“文件另存为”就会触发

哼!