Notitie
Voor toegang tot deze pagina is autorisatie vereist. U kunt proberen u aan te melden of de directory te wijzigen.
Voor toegang tot deze pagina is autorisatie vereist. U kunt proberen de mappen te wijzigen.
Sets the specified fill to a uniform color. Use this method to convert a gradient, textured, patterned, or background fill back to a solid fill.
Syntax
expression.Solid
expression A variable that represents a FillFormat object.
Example
This example converts all fills on the first page of the active publication to uniform red fills.
Dim shpLoop As Shape
For Each shpLoop In ActiveDocument.Pages(1).Shapes
With shpLoop.Fill
.Solid
.ForeColor.RGB = RGB(255, 0, 0)
End With
Next shpLoop
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.