指定した塗りつぶしを均一な色に設定します。
構文
式。固体
expression 必須です。 FillFormat オブジェクトを表す変数を指定します。
注釈
グラデーション、テクスチャ、パターン、または図の塗りつぶしを均一な塗りつぶしに変換します。
例
次の使用例は、作業中の文書のすべての塗りつぶしを、均一な赤の塗りつぶしに変換します。
Dim shapeLoop As Shape
For Each shapeLoop In ActiveDocument.Shapes
With shapeLoop.Fill
.Solid
.ForeColor.RGB = RGB(255, 0, 0)
End With
Next
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。