Reply
 
Thread Tools Display Modes
  #1   Report Post  
 
Posts: n/a
Default Finding most recent addition to document

I'm using Track Changes on a very long document in Word 97, where
various lines are being added to points throughout at various times.
Is there a way I can quickly find the most recent addition, or an
addition made on a known date?

  #2   Report Post  
macropod
 
Posts: n/a
Default Finding most recent addition to document

Hi Karl,

You could use a macro like the following to find the most recent revision.

Sub FindLastRevision()
Dim iRev As Integer
With ActiveDocument
If .Revisions.Count 0 Then
iRev = 1
For i = 1 To .Revisions.Count
If .Revisions(i).Date .Revisions(iRev).Date Then
iRev = i
End If
Next
MsgBox .Revisions(iRev).Range.Text & vbCrLf &
..Revisions(iRev).Date
.Revisions(iRev).Range.Select
End If
End With
End Sub

Note that the code fails if a revision in a table updated just part of the
row, with a "Runtime error '5852' - Requested object is not available"
message. I'm not sure how to code around that, since accessing any of the
affected revision's properties seems to have the same effect. Everything
works fine if the whole row was updated, though.

Cheers

wrote in message
oups.com...
I'm using Track Changes on a very long document in Word 97, where
various lines are being added to points throughout at various times.
Is there a way I can quickly find the most recent addition, or an
addition made on a known date?



  #3   Report Post  
macropod
 
Posts: n/a
Default Finding most recent addition to document

Since posting the previous reply I've found that the Runtime error '5852'
occurs when both of the following conditions are true:
A paragraph formatting change was made inside a table.
A formatting change was made to an end-of-row marker in a table.
MS released fixes for both Word 2002 and 2003 but not, apparently, Word
2000. MSKB articles 837108 and 841539 refer.

Cheers


Reply
Thread Tools
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
macros and SharePoint WSS document libraries [email protected] New Users 0 October 6th 05 03:42 AM
opening and changing a document by multiple people at the same tim GSelser Microsoft Word Help 0 August 11th 05 10:05 PM
Can you save individual document pages as seperate word files? John Calligy Mailmerge 2 April 12th 05 09:14 AM
Addition of footnote to converted document with consecutive numbe. Boosie W. Microsoft Word Help 2 March 4th 05 10:46 PM
addition of numbers within a word document jag Microsoft Word Help 1 January 2nd 05 04:10 AM


All times are GMT +1. The time now is 03:36 PM.

Copyright ©2000 - 2023, Jelsoft Enterprises Ltd.
Copyright 2004-2023 Microsoft Office Word Forum - WordBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Word"