ColorFormat.BaseRGB-Eigenschaft (Publisher)

Gibt eine PbColorType-Konstante zurück, die das ursprüngliche RGB-Farbformat darstellt, bevor farbändernde Eigenschaften wie Farbtöne und Schattierungen angewendet werden, oder legt diese fest. Lese-/Schreibzugriff.

Syntax

Ausdruck verwendet werden. BaseRGB

Ausdruck Eine Variable, die ein ColorFormat-Objekt darstellt.

Rückgabewert

PbColorType

Beispiel

In diesem Beispiel wird eine Form erstellt, die Füllfarbe festgelegt und die Farbe aufgehellt, dann wird eine zweite Form erstellt und die ursprüngliche RGB-Farbe der ersten Form auf die zweite Form angewendet.

Sub SetBaseRGB() 
 Dim shpOne As Shape 
 
 With ActiveDocument.Pages(1).Shapes 
 Set shpOne = .AddShape(Type:=msoShapeHeart, _ 
 Left:=150, Top:=150, Width:=300, Height:=300) 
 With shpOne.Fill.ForeColor 
 .RGB = RGB(Red:=160, Green:=0, Blue:=255) 
 .TintAndShade = 0.9 
 End With 
 .AddShape(Type:=msoShapeRectangle, Left:=62, _ 
 Top:=500, Width:=488, Height:=100).Fill _ 
 .ForeColor.RGB = shpOne.Fill.ForeColor.BaseRGB 
 End With 
End Sub

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.