Wenn Sie mit Dokumenten arbeiten – insbesondere mit langen Dokumenten, die von einer anderen Person erstellt wurden – müssen Sie möglicherweise alle Felder im Dokument löschen. Die Antwort darauf hängt fast ausschließlich davon ab, was Sie unter „Löschen“ eines Feldes verstehen.

Wenn Sie die Felder entfernen und durch einfachen Text ersetzen möchten, der das Ergebnis des Felds darstellt, wählen Sie am einfachsten das gesamte Dokument aus (Strg + A) und drücken Sie dann Strg + Umschalt + F9 bis „Verknüpfung aufheben“ der Felder. Überall dort, wo es ein Feld gab, wird das Feld gelöscht und durch das Ergebnis des Feldes ersetzt.

Wenn Sie einfach alle Felder entfernen möchten und nicht möchten, dass sie durch irgendetwas ersetzt werden, können Sie die Such- und Ersetzungsfunktionen von Word verwenden. Befolgen Sie diese Schritte:

  1. Drücken Sie Alt + F9. Dadurch werden alle Feldcodes in Ihrem Dokument anstelle der Ergebnisse dieser Felder sichtbar.

  2. Drücken Sie Strg + H. Word zeigt die Registerkarte Ersetzen des Dialogfelds Suchen und Ersetzen an. (Siehe Abbildung 1.)

  3. Geben Sie im Feld Suchen nach ^ d als das ein, wonach Sie suchen (stellen Sie sicher, dass Sie ein Kleinbuchstaben d verwenden). Dies ist der Code, den Word als „beliebiges Feld“ versteht.

  4. Stellen Sie sicher, dass das Feld Ersetzen durch leer ist.

  5. Klicken Sie auf Alle ersetzen.

Alle Felder in Ihrem Dokument sollten jetzt verschwunden sein. Wenn Sie Felder auf diese Weise häufig entfernen müssen, ist es sinnvoll, ein Makro zu erstellen, das die Aufgabe für Sie erledigt. Das folgende ist ein einfaches, kurzes Makro, das alle Teile Ihres Dokuments durchläuft und alle Felder entfernt.

Sub DeleteFields()

Dim rng As Range

For Each rng In ActiveDocument.StoryRanges         With rng.Fields             While .Count > 0                 .Item(1).Delete             Wend         End With     Next End Sub

Sie können das Makro natürlich dem Symbolleiste für den Schnellzugriff oder einer Tastenkombination zuweisen, damit es so schnell wie möglich in Aktion gesetzt werden kann.

Es ist zu beachten, dass dieses Makro nur die Felder aus dem Hauptdokument und dem ersten Textfeld entfernt, wenn Ihr Dokument mehrere Textfelder enthält. (Fragen Sie nicht warum; es scheint in Word eine Eigenart zu sein.) Wenn Sie Felder in mehr als nur dem ersten Textfeld haben, benötigen Sie einen anderen Makroansatz:

Sub DeleteAllFields()

Dim rng As Range     Dim shp As Shape     Dim TxtFrame As TextFrame

For Each rng In ActiveDocument.StoryRanges         With rng.Fields             While .Count > 0                 .Item(1).Delete             Wend         End With

For Each shp In rng.ShapeRange             Set TxtFrame = shp.TextFrame             If Not TxtFrame Is Nothing Then                 If TxtFrame.HasText Then                     With TxtFrame.TextRange.Fields                         While .Count > 0                             .Item(1).Delete                         Wend                     End With                 End If             End If         Next shp     Next rng End Sub

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (10818) gilt für Microsoft Word 2007, 2010, 2013 und 2016. Eine Version dieses Tipps für die ältere Menüoberfläche von Word finden Sie hier: Alle Felder löschen.