There is a built-in document property called RevNum that automatically
increases by 1 each time the document is saved. That number can be displayed
in the document by inserting a REVNUM field through the Insert > Field
dialog.
However, you may not want each save to represent a "version". In that case,
go to File > Properties > Custom and define a custom property named Version,
giving it a value. That value can then be displayed in the document by
inserting a DOCPROPERTY field that refers to the Version property. If you do
that, you can manually update the Version property in the Properties dialog
whenever you feel that a new version number is required; and you would have
to manually update the field in the document (or it will update
automatically when you print). To make this easier, install this macro in
the template -- see
http://www.gmayor.com/installing_macro.htm -- and assign
a toolbar button or keyboard shortcut to it. Each time you run the macro,
the version number will be increased and the field will be updated.
Sub UpdateVersion()
Dim verNum As Long
With ActiveDocument
verNum = CLng(.CustomDocumentProperties("Version"))
verNum = verNum + 1
.CustomDocumentProperties("Version") = CStr(verNum)
.Fields.Update
End With
End Sub
--
Regards,
Jay Freedman
Microsoft Word MVP
Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.