• Track changes – accept (97 – SR1)

    Author
    Topic
    #366280

    When using the Accept Changes command of the Track Changes feature, the choices seem to be accepting/rejectiing the changes one at a time or accepting the changes for the entire document.

    Is there a way to highlight a section of the document and accept all the changes within that section. A colleague thought that there may be a patch for Word 97 that would allow this functionality.

    Thx

    Viewing 0 reply threads
    Author
    Replies
    • #567531

      Try this little macro:

      Sub SelectionAcceptChanges()
      If MsgBox(“Accept all changes in the selected text?”, vbQuestion + vbYesNo) = vbYes Then
      Selection.Range.Revisions.AcceptAll
      End If
      End Sub

      If you or your colleague haven’t saved a Macro before, here’s the “basic” roadmap. (You may well be far ahead of this procedure.)

      1. Press Alt-F8 to open the macro dialog
      2. Type a name for your macro in the top box and click Create. The VB Editor will open with your insertion point in the middle of a procedure:

      Sub NameYouTyped()

      ‘ NameYouTyped Macro
      ‘ Macro created 1/31/2002 by YourUserName

      Your insertion point will be here
      End Sub

      3. Paste all of the above macro except the lines that being with Sub and End Sub, since Word has created these for you already.

      4. If you selected a portion of your test document with changes, you can immediately test the macro by pressing the F5 key. If not, switch back to Word and set up the test, then you can run the macro by pressing Alt-F8 and choosing it from the list.

      5. Finally, when all is working, you can add your macro to a toolbar or menu using Tools, Customize from inside Word.

      If you are writing complicated macros, you should save frequently from inside the editor. Good luck!

      • #567558

        Doh!! I never even thought of a macro. Have done lots in Access and Excel, but not much in Word. I’ll certainly use your method. Thanks.

      • #568148

        Jefferson

        That macro worked like a charm! Thanks very much.

        I’ve stored the macro in a .DOT file, and have created a menu button to run it. Now I want to take it to the next level grin

        Here’s what I’m trying to accomplish — perhaps there’s a better way??

        I want to make the macro available to all network users regardless of the template that was used to create the document. 99 1/2% of the time, their documents will be based their personal Normal.dot. It would be a maintenance hassle to insert the macro into every copy of Normal.dot. I thought that I could centralize the programming into one DOT file. I’ve done that in a shared network folder that everybody can see. It appears on their “File New” menu as “corporate standards”. Works great when creating a new document based on the template.

        My puzzle comes when I try to base an *existing* document on the template. In the Format > Style Gallery toolbar, I choose the appropriate DOT file, and expect to see (!!) the same macro and toolbar commandbutton as if I created a new document. But it’s not there… If I understand correctly what is going on when the Style Gallery command is selected, the document imports the styles from the DOT file, but it doesn’t import the macros and toolbars.

        Is there a way to import the macro and toolbar into an existing document that was based on Normal.dot? I understand that the best practice would be to base new documents on the correct DOT file, but there is a backlog of documents that could benefit from having this macro.

        Thanks.

        • #568156

          Just dug out Woody’s “Word 97 Annoyances”, and refreshed my memory on the Word Startup folder. I just need to place the DOT file in that folder, and it’s always available. Cool….

    Viewing 0 reply threads
    Reply To: Track changes – accept (97 – SR1)

    You can use BBCodes to format your content.
    Your account can't use all available BBCodes, they will be stripped before saving.

    Your information: