Barry hat ein ziemlich großes Word-Dokument (ungefähr 50 Seiten), das Hunderte von XE-Feldern enthält, die zum Erstellen eines Index verwendet werden. Er fragt sich, ob es eine Möglichkeit gibt, zu zählen, wie viele XE-Felder im Dokument vorhanden sind, ohne sie von Hand zu zählen.

Es gibt einige Möglichkeiten, wie Sie diesem Bedarf begegnen können. Die erste besteht darin, sich auf die Such- und Ersetzungsfunktionen von Word zu verlassen. Hier sind die einfachen Schritte:

  1. Wählen Sie Optionen aus dem Menü Extras. Word zeigt das Dialogfeld Optionen an.

  2. Stellen Sie sicher, dass die Registerkarte Ansicht angezeigt wird. (Siehe Abbildung 1.)

  3. Stellen Sie sicher, dass versteckter Text in Ihrem Dokument angezeigt wird. (Stellen Sie einfach sicher, dass entweder die Kontrollkästchen Versteckt oder Alle aktiviert sind.)

  4. OK klicken.

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

  6. Geben Sie im Feld Suchen nach „^ 19 XE“ ein (ohne Anführungszeichen).

  7. Geben Sie im Feld Ersetzen durch „^ &“ ein (erneut ohne Anführungszeichen).

  8. Klicken Sie auf Alle ersetzen.

Word findet alle XE-Felder und zeigt an, wie viele Ersetzungen vorgenommen wurden. Dies ist Ihre gewünschte Anzahl. Der Code ^ 19 (in Schritt 6) ist der Zeichencode für die öffnende Feldklammer, der angibt, dass nur Felder übereinstimmen sollten. Falls gewünscht, können Sie jetzt die Anzeige von verstecktem Text ausschalten.

Bei dieser Abfolge von Schritten sind einige Dinge zu beachten.

Erstens denken einige Leute vielleicht, dass oben ein Schritt fehlt:

Drücken Sie Alt + F9, um alle Feldcodes im Dokument anzuzeigen.

Dieser Schritt ist eigentlich nicht erforderlich, da XE-Felder immer angezeigt werden, solange versteckter Text sichtbar ist. Mit anderen Worten, das Drücken von Alt + F9 wirkt sich nicht auf die eine oder andere Weise auf die Anzeige aus. Wenn Sie jedoch ein anderes Feld als das XE-Feld zählen, möchten Sie die Feldcodes anzeigen, bevor Sie die Schritte ausführen.

Eine andere Sache zu beachten ist, dass Word ziemlich nachsichtig ist, wenn es um die Anzahl der Leerzeichen geht, die einer öffnenden Feldklammer folgen können. Die obigen Schritte finden nur XE-Felder, in denen ein einzelnes Leerzeichen die öffnende Feldklammer (^ 19) und den XE-Code trennt. Wenn Ihre Felder mehr Leerzeichen (oder keine Leerzeichen) enthalten, werden diese Instanzen des Felds nicht gezählt. Aus diesem Grund möchten Sie möglicherweise einfach nach XE suchen (ohne den Code und das Leerzeichen ^ 19) und das Kontrollkästchen Match Case aktivieren. Dies funktioniert so lange, wie Ihr Dokument keine anderen Instanzen von großgeschriebenen XE-Zeichen enthält.

Es gibt auch einige einfache Makros, mit denen Sie die XE-Felder zählen können. Wenn die einzigen Felder in Ihrem Dokument die XE-Felder sind, ist das Makro in der Tat sehr einfach:

Sub CountFields()

Dim iCnt As Integer

iCnt = ActiveDocument.Fields.Count     MsgBox "There are " & iCnt & " fields in the document."

End Sub

Dieser Ansatz funktioniert jedoch nicht, wenn Ihr Dokument andere Felder enthält. Denken Sie daran: Felder werden verwendet, um Ihren Index tatsächlich in einem Dokument zu platzieren. Wenn Sie also XE-Felder für Indexeinträge verwenden, verwenden Sie wahrscheinlich ein Feld, um den eigentlichen Index selbst einzufügen. Und natürlich kann Ihr Dokument auch viele andere Felder für andere Zwecke enthalten. In diesem Fall muss Ihr Makro jedes Feld untersuchen und feststellen, ob es sich um ein XE-Feld handelt oder nicht.

Sub CountXEFields()

Dim iCnt As Integer     Dim f As Field

For Each f In ActiveDocument.Fields         If f.Type = wdFieldIndexEntry Then iCnt = iCnt + 1     Next     MsgBox "There are " & iCnt & " XE fields in the document."

End Sub

Dieses Makro überprüft die Type-Eigenschaft jedes Field-Objekts, um sicherzustellen, dass es sich um ein XE-Feld handelt. Wenn ja, wird es zur Zählung hinzugefügt und die Zählung wird am Ende des Makros angezeigt.

_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 (11752) gilt für Microsoft Word 97, 2000, 2002 und 2003. Sie finden eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Word (Word 2007) und später) hier:

Felder in einem Dokument zählen.