Поделиться через

Свойство ColorFormat.BaseRGB (Publisher)

  • Статья

Возвращает или задает константу PbColorType , представляющую исходный формат цвета RGB, перед применением свойств изменения цвета, таких как тонирование и заливка. Для чтения и записи.

Синтаксис

expression. BaseRGB

Выражение Переменная, представляющая объект ColorFormat .

Возвращаемое значение

PbColorType

Пример

В этом примере создается фигура, задается цвет заливки и осветляется цвет, а затем создается вторая фигура и применяется исходный цвет RGB первой фигуры ко второй фигуре.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.