Método FillFormat.OneColorGradient (Publisher)

Define o preenchimento especificado com um gradiente de uma cor.

Sintaxe

expressão. OneColorGradient (Estilo, Variante, Grau)

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Estilo	Obrigatório	MsoGradientStyle	O estilo de gradiente. Pode ser uma das constantes MsoGradientStyle declaradas na biblioteca de tipos do Microsoft Office.
Variantes	Obrigatório	Long	A variante de gradiente. Pode ser um valor de 1 a 4, correspondente às quatro variações na guia gradiente da caixa de diálogo Efeitos de preenchimento. Se Style for msoGradientFromTitle ou msoGradientFromCenter, esse argumento poderá ser 1 ou 2.
Degree	Obrigatório	Single	O grau do gradiente. Pode ser um valor de 0.0 (escuro) a 1.0 (claro).

Exemplo

Este exemplo adiciona um retângulo com preenchimento gradual de uma única cor à publicação ativa.

With ActiveDocument.Pages(1).Shapes _ 
 .AddShape(Type:=msoShapeRectangle, _ 
 Left:=90, Top:=90, Width:=90, Height:=80).Fill 
 .ForeColor.RGB = RGB(0, 128, 128) 
 .OneColorGradient Style:=msoGradientHorizontal, _ 
 Variant:=1, Degree:=1 
End With 

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.