Méthode GradientStops.Delete (Office)
Cette méthode supprime un point de dégradé.
Syntaxe
expression. Supprimer (Index)
Expression Expression qui renvoie un objet GradientStops .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Index | Facultatif | Integer | Numéro d'index du point de dégradé. |
Remarques
Les dégradés représentent une transition en douceur à partir d'un état de couleur à une autre. Les points de terminaison de ces sections s'appellent des points.
Exemple
L'exemple suivant ajoute trois points de dégradés de couleurs puis supprime le premier.
Sub gradients()
Set myDocument = ActivePresentation.Slides(1)
Set GradientShapeFill = myDocument.Shapes.AddShape(msoShapeRectangle, 90, 90, 90, 80).Fill
With GradientShapeFill
.ForeColor.RGB = RGB(0, 128, 128)
.OneColorGradient msoGradientHorizontal, 1, 1
.GradientStops.Insert RGB(255, 0, 0), 0.25
.GradientStops.Insert RGB(0, 255, 0), 0.5
.GradientStops.Insert RGB(0, 0, 255), 0.75
End With
GradientShapeFill.GradientStops.Delete (1)
End Sub
Voir aussi
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour