Propriété FillFormat.GradientStops (PowerPoint)

Renvoie la collection GradientStops associée au format de remplissage spécifié. En lecture seule.

Syntaxe

expression. GradientStops

Expression Expression qui renvoie un objet FillFormat .

Valeur renvoyée

GradientStops

Remarques

Utilisez la méthode GradientStops.Insert pour ajouter des points de dégradé à la collection GradientStops pour l’objet spécifié.

Exemple

L’exemple suivant montre comment ajouter un point de dégradé à la position de 50 % à la collection GradientStops du format de remplissage de la première forme sur la première diapositive de la présentation active. Pour que cet exemple fonctionne, un remplissage dégradé doit déjà avoir été appliqué à la forme.

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

Voir aussi

Objet FillFormat

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.