Compartilhar via


Propriedade Shape.Fill (Publisher)

Retorna um objeto FillFormat representando o preenchimento da forma especificada ou célula de tabela.

Sintaxe

expressão. Preencher

Expressão Uma variável que representa um objeto Shape .

Exemplo

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

Suporte e comentários

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.