Jacie schrieb, dass sie ein Makro erstellt hatte, das den Text auf Time New Roman setzte. Sie wollte das Makro so ändern, dass es zwischen Times New Roman und Arial Narrow Bold umschaltet, und fragte sich, wie es geht.

Der einfachste Weg, dies in einem Makro zu tun, besteht darin, die in Ihrem ausgewählten Text verwendete Schriftart zu überprüfen und dann Schritte basierend auf dem, was Sie finden, auszuführen. Das folgende Makro wird beispielsweise nur dann aktiv, wenn der ausgewählte Text entweder Times New Roman oder Arial Narrow lautet:

Sub ChangeSelectedFont()

Select Case Selection.Font.Name         Case "Times New Roman"

Selection.Font.Name = "Arial Narrow"

Selection.Font.Bold = True         Case "Arial Narrow"

Selection.Font.Name = "Times New Roman"

Selection.Font.Bold = False     End Select End Sub

Es gibt jedoch einen anderen, nicht makroökonomischen Weg, der sinnvoll sein kann.

Warum nicht Stile verwenden? Sie können Stile so definieren, dass sie alle gewünschten Formatierungsattribute umfassen. Sie können beispielsweise einen Stil definieren, der Times New Roman verwendet, und einen anderen, der Arial Narrow Bold verwendet. Sie können die Stile nach Belieben über die Symbolleiste anwenden und sogar mithilfe der Stile suchen und ersetzen.

_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 (1300) 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:

Schriftzuweisungen in einem Makro umschalten.