我将文档修订从插入->快速部件->字段->RevNum 插入到我的文档中。
除非我在突出显示后使用 F9,否则它永远不会更新数字。所有字段都会发生这种情况,包括当前日期+时间和上次保存时间。
如何将字段设置为在保存文档时自动更新,以便查看已保存的内容?我找到了打开时更新的选项和打印时更新的选项。但是,当我必须重新打开文档以获取修订版本时,我如何知道在保存时要告诉人们哪个文档修订版本?
答案1
您可以将此代码放入ThisDocument
VBA 中的对象中。
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)
ActiveDocument.Fields.Update
End Sub
或者 - 如果您使用 SaveAs 命令:
Sub FileSaveAs()
Dialogs(wdDialogFileSaveAs).Show
'returns the name including the .doc extension
ChosenFileNameAndExtension = ActiveDocument.Name 'Or use .FullName
ActiveDocument.Fields.Update
End Sub