ColorSchemes-Objekt (Publisher)
Eine Auflistung aller ColorScheme Objekte in Microsoft Publisher. Jedes ColorScheme -Objekt stellt ein Farbschema, also eine Reihe von Farben, die in einer Publikation verwendet werden.
Hinweise
Verwenden Sie die Count -Eigenschaft, um die Anzahl der verfügbaren Farbschemas zu Publisher zurückzukehren.
Verwenden Sie die Item -Eigenschaft, um ein bestimmtes Farbschema aus der ColorSchemes -Auflistung zurückzugeben. Das Index-Argument der Item-Eigenschaft kann die Nummer oder der Name des Farbschemas oder eine PbColorScheme-Konstante sein.
Verwenden Sie den Namen -Eigenschaft auf den Namen eines Farbschemas zurückzugeben.
Beispiel
Im folgenden Beispiel wird die Anzahl der Farbschemas angezeigt.
Sub CountColorSchemes()
MsgBox Application.ColorSchemes.Count
End Sub
Das folgende Beispiel legt das Farbschema der aktiven Publikation auf Wildblume fest.
Sub SetColorScheme()
ActiveDocument.ColorScheme _
= ColorSchemes.Item(pbColorSchemeWildflower)
End Sub
Das folgende Beispiel listet alle in Publisher verfügbaren Farbschemas in einem Textfeld.
Sub ListColorShemes()
Dim clrScheme As ColorScheme
Dim strSchemes As String
For Each clrScheme In Application.ColorSchemes
strSchemes = strSchemes & clrScheme.Name & vbLf
Next
ActiveDocument.Pages(1).Shapes.AddTextbox( _
Orientation:=pbTextOrientationHorizontal, _
Left:=72, Top:=72, Width:=400, Height:=500).TextFrame _
.TextRange.Text = strSchemes
End Sub
Eigenschaften
Siehe auch
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.