Ich habe folgenden Code geschrieben, um z.B. alle Felder eines bestimmten Typs im Dokument aufzulösen.:
dim m_Field as field
For Each m_Field In ActiveDocument.Fields
If m_Field.Type = wdFieldDocProperty Then
m_Field.Update
m_Field.Unlink
End If
Next
Wenn ich dies so laufen lasse, werden alle Felder aufgelöst, ausser diejenigen in der Kopf- und Fusszeile. Weiss jemand, wie man die Felder in Kopf- und Fusszeile auflösen kann, ohne dass ich mühsam über den Code in die Kopfzeile wechseln muss und dann die Felder auflöse?
Als Info: Word 97
Vielen Dank