Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Define o preenchimento especificado para um gradiente de duas cores.
Sintaxe
expressão. TwoColorGradient (Estilo, Variante)
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. |
| Variant | Obrigatório | Long | A variante de gradiente. Pode ser de 1 a 4, correspondente às quatro variantes no sub-separador Gradação no separador Preenchimento da Forma . Se Style for msoGradientFromTitle ou msoGradientFromCenter, este argumento pode ser 1 ou 2. |
Exemplo
Este exemplo adiciona um retângulo com um preenchimento de gradiente de duas cores a myDocument e define a cor do plano de fundo e do primeiro plano para o preenchimento.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddShape(Type:=msoShapeRectangle, Left:=0, _
Top:=0, Width:=40, Height:=80).Fill
.ForeColor.RGB = RGB(Red:=128, Green:=0, Blue:=0)
.BackColor.RGB = RGB(Red:=0, Green:=170, Blue:=170)
.TwoColorGradient Style:=msoGradientHorizontal, Variant:=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.