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
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.