Propriedade FillFormat.GradientDegree (Word)

Retorna um valor que indica o quão escuro ou claro um preenchimento gradual de uma cor é. Somente leitura único.

Sintaxe

expression. GradientDegree

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

Comentários

Um valor 0 (zero) significa que é misturado preto com a cor de primeiro plano da forma para formar o gradiente, um valor 1 significa que é misturado branco e valores entre 0 e 1 significam que é misturada uma sombra mais escura ou mais clara da cor de primeiro plano.

Use o método OneColorGradient para definir o grau do gradiente para o preenchimento.

Exemplo

Este exemplo adiciona um retângulo ao documento ativo e define o grau do seu gradiente de preenchimento para coincidir com o da forma chamada "Rectangle 2". Se Rectangle 2 não tiver um preenchimento gradual de uma cor, este exemplo falhará.

Dim docActive As Document 
Dim sngGradient As Single 
 
Set docActive = ActiveDocument 
With docActive.Shapes 
 sngGradient = .Item("Rectangle 2").Fill.GradientDegree 
 
 With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill 
 .ForeColor.RGB = RGB(0, 128, 128) 
 .OneColorGradient msoGradientHorizontal, 1, sngGradient 
 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.