ShapeRange.Fill 屬性 (Publisher)

會傳回 FillFormat 物件，此物件代表指定之圖形或表格儲存格的填滿格式。

語法

運算式。填補

表達 代表 ShapeRange 物件的 變數。

範例

在這個範例中，會建立一個新的 AutoShape 物件，並填上綠色。

Sub NewShapeItem() 
 
 Dim shpHeart As Shape 
 
 Set shpHeart = ThisDocument.MasterPages.Item(1).Shapes _ 
 .AddShape(Type:=msoShapeHeart, Left:=40, Top:=80, _ 
 Width:=50, Height:=50) 
 shpHeart.Fill.ForeColor.RGB = RGB(Red:=0, Green:=255, Blue:=0) 
 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。