Propriedade Shape.Fill (Publisher)
Retorna um objeto FillFormat representando o preenchimento da forma especificada ou célula de tabela.
expressão. Preencher
Expressão Uma variável que representa um objeto Shape .
Este exemplo cria um novo objeto AutoShape e preenche a forma com verde.
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
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.