Propriedade FillFormat.GradientStops (PowerPoint)

Retorna a coleção GradientStops associada ao formato de preenchimento especificado. Somente leitura.

Sintaxe

expressão. GradientStops

Expressão Uma expressão que retorna um objeto FillFormat .

Valor de retorno

GradientStops

Comentários

Use o método GradientStops.Insert para adicionar paradas de gradiente à coleção GradientStops para o objeto especificado.

Exemplo

O exemplo a seguir mostra como adicionar uma parada de gradiente na posição de 50% à coleção GradientStops do formato de preenchimento da primeira forma do primeiro slide da apresentação ativa. Para que esse exemplo funcione, a forma já deve ter um preenchimento de gradiente aplicado.

Public Sub GradientStops_Example() 
 
    Dim pptShape As Shape 
    Dim pptFillFormat As FillFormat 
    Dim pptGradientStops As GradientStops 
     
    Set pptShape = ActivePresentation.Slides(1).Shapes(1) 
    Set pptFillFormat = pptShape.Fill 
    Set pptGradientStops = pptFillFormat.GradientStops 
     
    pptGradientStops.Insert RGB(255, 0, 255), 0.5 
     
End Sub

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.