指定した図形を 1 つの大きな画像で塗りつぶします。
構文
式。UserPicture (PictureFile)
式FillFormat オブジェクトを表す変数。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| PictureFile | 必須 | 文字列型 (String) | 図のファイル名を指定します。 |
注釈
イメージの小さいタイル状の図形の塗りつぶしには、 UserTextured メソッドを使用します。
例
この例では、アクティブなパブリケーションに 2 つの四角形を追加します。 左側の四角形には、1 つの大きな画像が描かれています。右側の四角形には、同じ画像の小さなタイルが多数表示されています。 この例を動作させるには、 PathToFile を有効なファイル パスに置き換える必要があることに注意してください。
With ActiveDocument.Pages(1).Shapes
.AddShape(Type:=msoShapeRectangle, _
Left:=0, Top:=0, Width:=200, Height:=100).Fill _
.UserPicture PictureFile:="PathToFile"
.AddShape(Type:=msoShapeRectangle, _
Left:=300, Top:=0, Width:=200, Height:=100).Fill _
.UserTextured TextureFile:="PathToFile"
End With
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。