Accept all changes by one editor?

[google_poster]

I have a word document with changes from different users. I would
like to accept all of the changes from one person, and review the rest
individually. Any ideas on how to accomplish this in Word 2007?
Thanks!

 

[Doug Robbins - Word MVP]

Run a macro containing the following code:

Dim i As Long
With ActiveDocument
For i = .Revisions.Count To 1 Step -1
If .Revisions(i).Author = "Joe Blogs" Then
.Revisions(i).Accept
End If
Next i
End With


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP, originally posted via msnews.microsoft.com

 

[Suzanne S. Barnhill]

Using the Review tab, in the Tracking group, click Show Markup, then
Reviewers, and select just the Reviewer whose changes you want to accept.
Then click on Accept in the Changes group and choose Accept All Changes
Shown.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
http://word.mvps.org

 

[Jay Freedman]

And without a macro:

- On the Review tab, click the Show Markup button, choose Reviewers,
and uncheck All Reviewers.

- Then click the same button again and check the one reviewer you want
to accept for.

- Click the bottom half of the Accept button and choose Accept All
Changes Shown. That will accept the changes for the selected reviewer.

- Again click the Show Markup button and check All Reviewers.

The first reviewer's name will be gone from the list of reviewers, and
you can go through the rest of the changes in the normal fashion.

--
Regards,
Jay Freedman
Microsoft Word MVP
Email cannot be acknowledged; please post all follow-ups to the
newsgroup so all may benefit.

 

[google_poster]

Thanks Suzanne and Jay - great, easy solution!
And thanks Doug for doing the work to come up with the macro.
--Bob