共用方式為

PowerPoint) (ExtraColors 物件

  • 發行項

代表簡報中的額外色彩。 此物件最多可以含有八種色彩，而每種色彩都是以紅-綠-藍 (RGB) 值代表。

範例

使用ExtraColors屬性可傳回 ExtraColors 物件。 使用 ExtraColors (索引) ，其中 index 是額外的色彩索引編號，可傳回單一額外色彩的紅-綠-藍 (RGB) 值。 下列範例會將矩形新增至在使用中簡報的投影片並將其填滿前景色彩設定為第一個的額外色彩。 如果尚未定義的簡報的額外色彩至少一個，本範例會將會失敗。

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)

另請參閱

PowerPoint 物件模型參考資料

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。