Question

多个对象 ColorFormat

代表单色对象的颜色、带有过渡或图案填充的对象的前景或背景色，或者指针的颜色。可以将颜色设为显式的红-绿-蓝值（使用RGB 属性）或设为配色方案中的一种颜色（使用SchemeColor 属性）。

使用 ColorFormat 对象

使用下表中列出的属性之一返回ColorFormat 对象。

使用此属性	对此对象	如果要返回一个 ColorFormat 对象，该对象代表
DimColor	AnimationSettings	变暗对象使用的颜色
BackColor	FillFormat	背景填充色（用于底纹或图案填充）
ForeColor	FillFormat	前景填充色（或填充色仅为单色）
Color	Font	项目符号或字符颜色
BackColor	LineFormat	背景线颜色（使用带图案的线）
ForeColor	LineFormat	前景线颜色（或线条颜色仅为实线）
ForeColor	ShadowFormat	阴影颜色
PointerColor	SlideShowSettings	演示文稿的默认指针颜色
PointerColor	SlideShowView	幻灯片放映视图中的临时指针颜色
ExtrusionColor	ThreeDFormat	凸出对象的侧面颜色

可以使用SchemeColor 属性将幻灯片元素的颜色设置为标准配色方案中的颜色。以下示例将当前演示文稿第二张幻灯片第一个形状的文本颜色设为标准配色方案的标题颜色。

ActivePresentation.Slides(2).Shapes(1).TextFrame _
 .TextRange.Font.Color.SchemeColor = ppTitle

使用RGB 属性将颜色设置为显示的红-绿-蓝值。以下示例向myDocument 中添加一个矩形，然后设置矩形填充的前景色、背景色和过渡。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddShape(msoShapeRectangle, 90, 90, 90, 50).Fill
 .ForeColor.RGB = RGB(128, 0, 0)
 .BackColor.RGB = RGB(170, 170, 170)
 .TwoColorGradient msoGradientHorizontal, 1
End With