I'm not aware of anything in the code that could account for that. Perhaps re-starting Word (or even Windows) will resolve the problem. If not, try repairing the Office installation (via Help|Detect & Repair for Word 2003 & via Programs & Features > Microsoft Office > Change in the Windows Control Panel for Word 2010).



PS: There's no need to quote each previous post in its entirety every time you make a reply. Quote only when you need to and only those parts warranting it.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Re-starting Word or the OS didn't help.

In order to search what in the document was causing this issue, I went through every revision in the document from the beginning, using Word's FindNextRevision button. Surprisingly, a revision in a table was causing an endless loop. Pressing the FindNextRevision button repeatedly still resulted in circling around the revised word in the table. I have no idea what caused this particular revision to behave this way, but I think that part was wreaking havoc with the macro. When I accepted the revision in the table, I no longer experienced the run-time error.

Your mention of revisions within a table reminded me of: http://support.microsoft.com/kb/913804. According to http://support.microsoft.com/kb/841539, this was fixed in Office 2003 Service Pack 2, which raises thequestion: Do you have Office 2003 Service Pack 2 or later installed?

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Your wealth of knowledge is astounding.

I checked my Word version in the Help menu, and I have Service Pack 3 even. Not a firm believer in the robustness of Microsoft's operation, I refused to give MS the benefit of the doubt and personally went to see the registry under HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\W ord\Options.

Surprise! (Well, actually I wasn't surprised.) There was still no AlternateRevisionStepThrough key in there. I have no idea what transpired when Service Pack 3 was installed, but the key must have been removed some time ago if Service Pack 2 had ever installed it.

Anyways, I've manually inserted the key, as instructed by the Knowledge Base, and the problem is gone!

Thanks so much!

And the long saga continues.

Would a picture (inserted as a file through Insert-Picture command) cause an error with this macro? I inserted a JPG file in the document and started facing run-time error 5917.

Possibly. Try inserting:
On Error Resume Next
before:
For i = 1 To .Revisions.Count
That should allow the macro to skip over such errors.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

I've been OS for 3½ months, hence the delay in replying. Are you sure it's a deletion that's being missed, and not a move?

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Yes, I think you can easily reproduce the symptom by starting a new document, typing a few sentences and playing around with them.

I've done that and haven't found any anomalies. Perhaps you could post a document that demonstrates the problem and describe how you went about creating the scenario.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Posting a document that can demonstrate this problem is tricky. I think it's situation-dependent rather than document-dependent. I can save a document but when I open it in a new session, the symptom goes away. I'll try to figure out when exactly this problem takes place.