Propriedade FillFormat.GradientColorType (Publisher)

Retorna uma constante MsoGradientColorType indicando o tipo de cor gradiente para o preenchimento especificado. Somente leitura.

Sintaxe

expressão. GradientColorType

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

Valor de retorno

MsoGradientColorType

Comentários

Use o método OneColorGradient, PresetGradient ou TwoColorGradient para definir o tipo de gradiente para o preenchimento.

O valor da propriedade GradientColorType pode ser uma das constantes MsoGradientColorType declaradas na biblioteca de tipos do Microsoft Office.

Exemplo

Este exemplo altera o preenchimento de todas as formas da primeira forma da publicação ativa que possuem um preenchimento gradiente de duas cores para um preenchimento de gradiente predefinido.

Dim shpLoop As Shape 
 
' Loop through collection of shapes. 
For Each shpLoop In ActiveDocument.Pages(1).Shapes 
 With shpLoop.Fill 
 ' Test for two-color gradient. 
 If .GradientColorType = msoGradientTwoColors Then 
 ' Apply a preset gradient. 
 .PresetGradient Style:=msoGradientHorizontal, _ 
 Variant:=1, PresetGradientType:=msoGradientBrass 
 End If 
 End With 
Next shpLoop 

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.