Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Word => Thema gestartet von: Max93 am August 20, 2019, 11:57:45 Vormittag

Titel: Office 2016 Mehrere Farben in der Schnellleiste
Beitrag von: Max93 am August 20, 2019, 11:57:45 Vormittag

Servus Leute,

eine kurze Fragen.
Wie kriege ich mehrere Farben z.B. Rot, Grün und Blau oben in die Schnellleiste ohne die immer einzel auswählen zu müssen?
Ich schreibe viel Informationen und makiere diese mit unterschiedlichen Farben und mich nervt es extrem diese ständig manuell auswählen zu müssen.

Einfacherer wäre einfach den Text zu makieren und dann oben auf die Schnellleiste auf die gewünschte Farbe zu klicken.

Hat da jemand eine Idee?

vielen Danke :-)

Titel: Antw:Office 2016 Mehrere Farben in der Schnellleiste
Beitrag von: G.O.Tuhls am August 21, 2019, 23:50:07 Nachmittag

Das wirst Du nur mit Makros hinbekommen, für die Du Schaltflächen in die Schnellstartleiste einfügst.
    Selection.Shading.ForegroundPatternColor =
    Selection.Shading.BackgroundPatternColor =

Gruß
G.O.

Titel: Antw:Office 2016 Mehrere Farben in der Schnellleiste
Beitrag von: Max93 am August 25, 2019, 18:26:22 Nachmittag

Danke Dir! ich musste aber den Befehl etwas erweitern und zwar um

Code: [Auswählen]

Sub Textfarbe Rot()

    With Selection.Font
        If Not .Color = wdColorBlack Then
            If .Color = wdColorRed Then
                .Color = wdColorTeal
            Else
                .Color = wdColorRed
            End If
        End If
    End With
               
End Sub
Und dann jeweils einfach nur den Farbnamen ändern.

Ergebnis wohla!