AnsweredAssumed Answered

How can I get a Word Document to automatically change the revision number everytime someone checks it out and edits it?

Question asked by Andrew Whiting on Aug 1, 2013
Latest reply on Aug 2, 2013 by Tim Read

Hello! I have multiple Microsoft Word '97 documents that have revision letters that automatically change in the document everytime it is opened and something has changed. Well, the company I work for has since upgraded to Word 2010, and the automatic revisions wont update anymore. I know the data card and document are linked because everytime I fill information out in the Data Card, the data on the document changes to what the data card says. Everything changes BUT the revision letter. The file extensions are .doc. I have already tried converting it to a .docm so the macros are enabled, but that still won't work. I don't understand! I have already created a macro.


Heres the code I used:


Sub AutoOpen()


' AutoOpen Macro

' Macro created 7/31/13 by AWHITING


'    ActiveDocument.Select

'    Selection.WholeStory

'    Selection.Fields.Update

'    Selection.HomeKey Unit:=wdLine


'End Sub


   Dim aStory As Range

   Dim aField As Field


   For Each aStory In ActiveDocument.StoryRanges


      For Each aField In aStory.Fields


      Next aField


   Next aStory


End Sub