Partilhar via


Propriedade FillFormat.GradientStyle (Word)

Retorna o estilo de gradiente para o preenchimento especificado. MsoGradientStyle somente leitura.

Sintaxe

expressão. Gradientstyle

Expressão Uma expressão que representa um objeto FillFormat .

Comentários

Esta propriedade é somente leitura. Use o método OneColorGradient ou TwoColorGradient para definir o estilo de gradiente para o preenchimento.

A tentativa de retornar essa propriedade para um preenchimento que não tenha um gradiente irá gerar um erro. Use a propriedade Type para determinar se o preenchimento tem um gradiente.

Exemplo

Este exemplo adiciona um retângulo ao documento ativo e define seu estilo de gradiente de preenchimento para coincidir com o da forma chamada "rect1". Para que o exemplo funcione, rect1 precisa ter um preenchimento gradiente.

Dim docActive As Document 
Dim lngGradient As Long 
 
Set docActive = ActiveDocument 
With docActive.Shapes 
 lngGradient = .Item("rect1").Fill.GradientStyle 
 With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill 
 .ForeColor.RGB = RGB(128, 0, 0) 
 .OneColorGradient lngGradient, 1, 1 
 End With 
End With

Confira também

Objeto FillFormat

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.