全部显示

ExtraColors 对象

Presentation ExtraColors

代表演示文稿中的其他颜色。该对象最多可以包含八种颜色，每种颜色由一个 RGB 值表示。

使用 ExtraColors

使用 ExtraColors 属性返回 ExtraColors 对象。使用 ExtraColors(index) 返回单个其他颜色的红-绿-蓝（RGB）值，其中 index 是其他颜色索引号。以下示例在当前演示文稿的第一张幻灯片中添加一个矩形，并将前景填充颜色设为第一种其他颜色。如果演示文稿中没有定义任何其他颜色，此示例将失败。

With ActivePresentation
    Set rect = .Slides(1).Shapes _
        .AddShape(msoShapeRectangle, 50, 50, 100, 200)
    rect.Fill.ForeColor.RGB = .ExtraColors(1)
End With

使用 Add 方法添加其他颜色。以下示例在当前演示文稿中添加一个其他颜色（如果该颜色尚未被添加）。

ActivePresentation.ExtraColors.Add RGB(69, 32, 155)