Freigeben über


ColorScheme.Colors-Eigenschaft (Publisher)

Gibt ein ColorFormat -Objekt zurück, das eine Farbe des angegebenen Farbschemas darstellt.

Syntax

Ausdruck. Farben (ColorIndex)

Ausdruck Eine Variable, die ein ColorScheme-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
ColorIndex Erforderlich PbSchemeColorIndex Die Farbe des Schemas, die auf der Grundlage ihrer Funktion im Schema zurückgegeben werden soll. Dies kann eine der pbSchemeColorIndex-Konstanten sein, die in der Microsoft Publisher-Typbibliothek deklariert sind.

Rückgabewert

ColorFormat

Beispiel

Im folgenden Beispiel wird die ColorSchemes-Auflistung durchlaufen und nach Farbschemas gesucht, bei denen die folgende Hyperlinkfarbe der Farbe mit dem RGB-Wert 128 entspricht.

Dim cscLoop As ColorScheme 
Dim colTemp As ColorFormat 
 
For Each cscLoop In Application.ColorSchemes 
 With cscLoop 
 Set colTemp = .Colors(ColorIndex:=pbSchemeColorFollowedHyperlink) 
 If colTemp.RGB = RGB(128, 0, 0) Then 
 Debug.Print "Color scheme '" & .Name _ 
 & "' has a followed hyperlink " _ 
 & "color matching RGB(128, 0, 0)" 
 End If 
 End With 
Next cscLoop

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.