I had written a MS Word 97 Macro to successfully remove all index entries. Here is the revised macro code.

----- Sub MAIN

REM - drop index markings - customized by Makarand

On Error Resume Next

ShowAll

StartOfDocument

EditGoTo .Destination =3D "d'XE'"

While CmpBookmarks("\Sel", "Temp") <> 0

CharRight 1, 1

EditClear

CharLeft

EditBookmark "Temp", .Add

EditGoTo .Destination =3D "d'XE'"

Wend

EditBookmark "Temp", .Delete

StartOfDocument

End Sub
-----
 

There were 834 index entries in my document. I have removed them in less than half hour.

Regards

Mak