[dba-Tech] Word index

On 2/13/07, Susan Harkins <ssharkins at setel.com> wrote:
> How do I remove all the index field codes from a document? I can't submit a
> manuscript with all these codes. Surely, I don't have to delete each one
> individually?

Nope. here is some code to run:

Sub DeleteIndexEntries()

Dim doc As Document
Dim fld As Field

Set doc = ActiveDocument

For Each fld In doc.Fields
  fld.Select
  If fld.Type = wdFieldIndexEntry Then
    fld.Delete
  End If
Next

Set fld = Nothing
Set doc = Nothing

End Sub

Just copy and paste into a module in the doc and run.

-- 
Bryan Carbonnell - carbonnb at gmail.com
Life's journey is not to arrive at the grave safely in a well
preserved body, but rather to skid in sideways, totally worn out,
shouting "What a great ride!"