Mon 6 Dec 2004
Here is a simple and useful macro for MS Word which will update all of the linked cross-references in a document at once. A lifesaver!!
(This works for PC Word… haven’t tested it for Mac. Let me know!)
Sub UpdateAll()
Dim oStory As Range
Dim oField As Field
For Each oStory In ActiveDocument.StoryRanges
For Each oField In oStory.Fields
oField.Update
Next oField
Next oStory
End Sub
December 7th, 2004 at 1:33 am
works on mac…
December 10th, 2004 at 10:41 pm
Hey, when did you add that image validation thingy?
Judd, by the powers vested in me, I dub thee VBA programmer of SIMS.
April 20th, 2005 at 7:11 am
I have one problem with that script… the document i am creating requires the the version number be listed in the main document body (coversheet). Problem being… I am using the RevNum, to get my Version number for the document and it is automatically updated in the footer, the code is cause the Revision number to jump up by two or more when the macro runs to update the fields. Any help would be greatly appreciated…