Trent arbeitet für einen wissenschaftlichen Verlag. In den Manuskripten, mit denen er arbeitet, gibt es viele Fachbegriffe, wie zum Beispiel Namen verschiedener Arten von Insekten oder Tieren. Scott muss sicherstellen, dass alle diese Artennamen kursiv geschrieben sind. Scott fragt sich, ob es eine Möglichkeit gibt, eine Liste von Begriffen (möglicherweise in einer Textdatei) zu verwenden und Word sicherzustellen, dass jedes Wort in der Liste im Dokument kursiv dargestellt wird.

Es gibt mehrere Add-On-Tools, mit denen Sie diese bestimmte Aufgabe ausführen können. Zwei von ihnen, die von WordTips-Lesern vorgeschlagen wurden, umfassen Folgendes:

FRedit: http://www.archivepub.co.uk/book.html EditTools: http://www.wordsnsync.com/

Dies sind leistungsstarke Tools, und Sie können FRedit sogar kostenlos erhalten. Der Nachteil ist natürlich, dass jedes Tool eine eigene Lernkurve hat, die Sie durchlaufen müssen, damit es das tut, was Sie wollen.

Ein anderer Ansatz besteht darin, ein eigenes Makro zu erstellen, um die Aufgabe auszuführen.

Glücklicherweise wäre ein solches Makro nicht so komplex. Grundsätzlich können Sie eine einfache Textdatei (mit einem Programm wie Notepad) erstellen, die in jeder Zeile einen einzelnen Artennamen enthält. Ihr Makro könnte dann die Datei öffnen, jede Zeile lesen und alle Instanzen dieser Art in Ihrem Dokument in Kursivschrift ändern.

Sub FindSpeciesForItalic2()

Dim sSpecies As String

Open "C:\species.txt" For Input As #1     Do While Not EOF(1)

Line Input #1, sSpecies         With Selection.Find             .ClearFormatting             .Replacement.ClearFormatting             .Replacement.Font.Italic = True             .Text = sSpecies             .Forward = True             .Wrap = wdFindContinue         End With         Selection.Find.Execute Replace:=wdReplaceAll     Loop     Close #1 End Sub

Dieses Makro basiert auf der Textdatei species.txt, die im Stammverzeichnis des Laufwerks C: gespeichert ist. (Sie können es an einem anderen Ort speichern oder etwas anderes benennen. In diesem Fall müssten Sie jedoch die Codezeile ändern, um die Änderungen widerzuspiegeln.) Nachdem jede Zeile aus der Textdatei gelesen wurde, wird Suchen und Ersetzen verwendet Stellen Sie sicher, dass der Text kursiv geändert wird.

Bei Artennamen ist dies normalerweise kein Problem. Sie sollten jedoch sicherstellen, dass jede Zeile in der Textdatei so eindeutig ist, dass keine Teilwörter im Dokument betroffen sind. Zum Beispiel wäre es keine gute Idee, nur nach „eins“ zu suchen, da dies zu Dingen wie „erledigt“ oder „Ton“ oder „Einzelgänger“ oder …​ passt. Nun, Sie haben die Idee.

_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 (13639) gilt für Microsoft Word 2007, 2010, 2013, 2016, 2019 und Word in Office 365.