Unlink all fields in the body of a document

Article contributed by Bill Coan

For Each oField In ActiveDocument.Fields
    oField.Unlink
Next oField