Propriété ColorFormat.BaseRGB (Publisher)
Renvoie ou définit une constante PbColorType qui représente le format de couleur RVB d’origine avant l’application de propriétés de changement de couleur, telles que la teinte et l’ombrage. Lecture-écriture.
Syntaxe
expression. BaseRVB
Expression Variable qui représente un objet ColorFormat .
Valeur renvoyée
PbColorType
Exemple
Cet exemple crée une forme, définit la couleur de remplissage et éclaircit la couleur, puis crée une deuxième forme et applique la couleur RVB d’origine de la première forme à la deuxième forme.
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
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.