次の方法で共有


FillFormat.PresetGradientType プロパティ (PowerPoint)

指定した塗りつぶしの既定のグラデーションの種類を取得します。 値の取得のみ可能です。

構文

PresetGradientType

FillFormat オブジェクトを表す変数。

戻り値

MsoPresetGradientType

注釈

塗りつぶしの既定のグラデーションの種類を設定するには、 PresetGradient メソッドを使用します。

PresetGradientType プロパティの値には、これらの MsoPresetGradientType 定数のいずれかを指定できます。

msoGradientBrass
msoGradientCalmWater
msoGradientChrome
msoGradientChromeII
msoGradientDaybreak
msoGradientDesert
msoGradientEarlySunset
msoGradientFire
msoGradientFog
msoGradientGold
msoGradientGoldII
msoGradientHorizon
msoGradientLateSunset
msoGradient Mahogany
msoGradientMoss
msoGradientNightfall
msoGradientOcean
msoGradientParchment
msoGradientPeacock
msoGradientRainbow
msoGradientRainbowII
msoGradientSapphire
msoGradientSilver
msoGradientWheat
msoPresetGradientMixed

次の使用例は、myDocument 内で塗りつぶしが既定のグラデーションの [こけ] であるすべての図形に対して、既定のグラデーションを [霧] に変更します。

Set myDocument = ActivePresentation.Slides(1)

For Each s In myDocument.Shapes

    With s.Fill

        If .PresetGradientType = msoGradientMoss Then

            .PresetGradient = msoGradientFog

        End If

    End With

Next

関連項目

FillFormat オブジェクト

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

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