Fill 属性

       

返回 FillFormat 对象,该对象包含指定图形的填充格式属性。只读。

示例

本示例首先向 myDocument 添加一个矩形,然后为其设置前景色、背景色和矩形填充的过渡类型。

Set myDocument = Documents(1)
With myDocument.Shapes.AddShape(msoShapeRectangle, _
        90, 90, 90, 50).Fill
    .ForeColor.RGB = RGB(128, 0, 0)
    .BackColor.RGB = RGB(170, 170, 170)
    .TwoColorGradient msoGradientHorizontal, 1
End With