ExtraColors オブジェクト (PowerPoint)

プレゼンテーションの追加の色を表します。 このオブジェクトには、最大 8 色を含めることができ、各色は、RGB 値で表されます。

例

ExtraColors オブジェクトを取得するのにには、ExtraColorsプロパティを使用します。 ExtraColors (index) を使用します。index は余分な色のインデックス番号で、1 つの余分な色の赤緑青 (RGB) の値を返します。 次の使用例は、作業中のプレゼンテーションのスライド 1 に四角形を追加し、最初の追加色を背景色の塗りつぶしの色に設定します。 プレゼンテーションに対して定義されている少なくとも 1 つの余分な色をされていない、次の使用例は失敗します。

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 Object Model Reference

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。