指定した塗りつぶしに、既定のグラデーションを設定します。
構文
式。PresetGradient (Style、 Variant、 PresetGradientType)
式FillFormat オブジェクトを表す変数。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| Style | 必須 | MsoGradientStyle | グラデーションのスタイルを指定します。 |
| Variant | 必須 | 整数型 (Integer) | グラデーションのバリエーションを指定します。 [図形の塗りつぶし] タブの [グラデーション] サブタブの 4 つのバリエーションに対応する 1 から 4 までの値を指定できます。Style が msoGradientFromTitle または msoGradientFromCenter の場合、この引数は 1 または 2 のいずれかになります。 |
| PresetGradientType | 必須 | MsoPresetGradientType | グラデーションの種類を指定します。 |
例
次の使用例は、myDocument に既定の塗りつぶしのグラデーションを設定した四角形を追加します。
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddShape(msoShapeRectangle, 90, 90, 140, 80).Fill.PresetGradient msoGradientHorizontal, 1, msoGradientBrass
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。