Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Définit un gradient monochrome pour le remplissage spécifié.
Syntaxe
expression. OneColorGradient( _Style_, _Variant_, _Degree_ )
Expression Variable qui représente un objet FillFormat .
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Style | Obligatoire | MsoGradientStyle | Style de dégradé. |
| Variant | Obligatoire | Entier long | Variante du dégradé. Il peut s’agir d’une valeur comprise entre 1 et 4, correspondant aux quatre variantes de l’onglet Dégradé de l’onglet Remplissage de la forme . Si Style est msoGradientFromTitle ou msoGradientFromCenter, cet argument peut avoir la valeur 1 ou 2. |
| Degree | Obligatoire | Single | Degré du dégradé. Peut représenter une valeur comprise entre 0 (foncé) et 1 (clair). |
Remarques
La valeur du paramètre Style peut être l’une de ces constantes MsoGradientStyle.
| msoGradientDiagonalDown |
| msoGradientDiagonalUp |
| msoGradientFromCenter |
| msoGradientFromCorner |
| msoGradientFromTitle |
| msoGradientHorizontal |
| msoGradientMixed |
| msoGradientVertical |
Exemple
Cet exemple montre comment ajouter dans myDocument un rectangle avec un remplissage en dégradé monochrome.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes _
.AddShape(msoShapeRectangle, 90, 90, 90, 80).Fill
.ForeColor.RGB = RGB(0, 128, 128)
.OneColorGradient msoGradientHorizontal, 1, 1
End With
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.