FillFormat.GradientVariant プロパティ (Word)

指定した塗りつぶしのグラデーションのバリエーションを、1 から 4 までの整数値で取得します。 取得のみ可能な Long 値です。

構文

式。GradientVariant

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

注釈

グラデーションの種類が msoGradientFromCenter の場合、取得する値は 1 または 2 です。 このプロパティの値は、[ 塗りつぶし効果] ダイアログ ボックスの [ グラデーション] タブのバリエーション (左右からおよび上から下に番号が付けられます) に対応しています。

OneColorGradient メソッドまたは TwoColorGradient メソッドを使用して、塗りつぶしのグラデーションバリアントを設定します。

例

次の使用例は、作業中の文書に四角形を追加し、"rect1" という名前の図形と同じグラデーションのバリエーションを設定します。この使用例が動作するためには、rect1 にグラデーションの塗りつぶしが設定されている必要があります。

Dim lngGradient As Long 
 
With ActiveDocument.Shapes 
 lngGradient = .Item("rect1").Fill.GradientVariant 
 With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill 
 .ForeColor.RGB = RGB(128, 0, 0) 
 .OneColorGradient msoGradientHorizontal, _ 
 lngGradient, 1 
 End With 
End With

関連項目

FillFormat オブジェクト

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

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