Der in Word vorhandene Textmarker lässt sich leider nicht mit einem Toggle bedienen. Wechselt man ins Menü Format – Hervorheben oder verwendet die Symbolschaltfläche Textmarker, wird die vorher eingestellte Farbe verwendet. Will man die Hervorhebung wieder aufheben, muss man zunächst die Farbe auf »Keine« ändern und kann dann ausschalten.
Die folgende kleine Prozedur hebt markierten Text gelb hervor oder hebt die Markierung auf, falls der Text vorher markiert war – unabhängig davon, in welcher Farbe. Auch die Einstellung der Farbe in der Symbolleistenauswahl wird nicht beeinflusst. Man kann den Code mit einem → Shortcut versehen oder auf eine eigene → Schaltfläche auf einer Symbolleiste legen.
Sub MarkiertenTextHervorheben()
' Toggle schaltet die Hervorhebung ein/aus, und zwar immer gelb,
' unabhängig von der Default-Einstellung im Menü Format - Hervorheben
' © Schreibbüro Nora Richter
If Not Selection.Type = wdSelectionNormal Then
Application.StatusBar = "Es ist kein Text markiert!"
Exit Sub
End If
With Selection.Range
If .HighlightColorIndex = wdAuto Then
.HighlightColorIndex = wdYellow
Else
.HighlightColorIndex = wdAuto
End If
End With
Selection.Collapse wdCollapseEnd
End Sub
Soll Text häufig in verschiedenen Farben hervorgehoben werden, können Sie die fertige → Textmarker-Symbolleiste verwenden, die alle Farben bequem bereithält.