指定した塗りつぶしまたは線に適用するパターンを表す が可能 定数を設定または返します。 読み取り専用です。
構文
式。パターン
式FillFormat オブジェクトを返す式。
例
次の使用例は、myDocument に四角形を追加し、"rect1" という名前の図形の塗りつぶしパターンを設定します。新しい四角形のパターンは "rect1" と同じですが、必ずしも同じ色ではありません。 パターンで使用する色は、BackColor および ForeColor プロパティで設定します。
Set myDocument = ActiveDocument
With myDocument.Shapes
pattern1 = .Item("rect1").Fill.Pattern
With .AddShape(msoShapeRectangle, 100, 100, 120, 80).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.BackColor.RGB = RGB(0, 0, 255)
.Patterned pattern1
End With
End With
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。