Hallo,
ich möchte gerne per VBA in Word alle Felder in einem Dokument entfernen, also per .unlink in Text umwandeln.
Das funktioniert soweit auch, aber leider werden auch alle Inhaltsverzeichnisse und Verweise zu Textmarken auf diese Weise entfernt/umgewandelt.
Wie könnte ich diese ausnehmen?
 

For Each FF In ActiveDocument.Fields
        If FF.Type = wdFieldExpression Xor FF.Type = wdFieldDocVariable Xor FF.Type = wdFieldIf Xor FF.Type = wdFieldRef Then
            If InStr(1, FF.Code.Text, "PAGE", 1) Or InStr(1, FF.Code.Text, "INHALT", 1) Or InStr(1, FF.Code.Text, "Inhalt", 1) Then
                'Dann ist es nur ein Feld zur Numerierung...?
            Else
                FF.Select
                Selection.ParentContentControl.LockContentControl = False
                Selection.Range.ParentContentControl.Ungroup
                FF.Unlink
            End If
        End If
    Next FF