Comment ajouter des dégradés à des cellules à l’aide de la propriété Gradient dans une macro Excel
Les outils que la technologie nous offre actuellement sont pratiquement infinis, mais il faut savoir les utiliser correctement pour atteindre l’objectif proposé. Aujourd’hui, Microsoft Excel et ses macros sont considérés comme les outils puissants, flexibles et les plus utilisés au monde.
Cependant, si vous êtes un utilisateur avancé, vous vous êtes peut-être demandé comment ajouter des dégradés aux cellules à l’aide de la propriété Gradient dans une macro Excel.
Avantages de la propriété Gradient dans une macro Excel
La propriété Gradient est un outil utile pour mettre en forme des cellules dans des feuilles de calcul en appliquant des couleurs de dégradé. Par conséquent, l’utiliser correctement vous permettra de faire ce qui suit:
- Personnalisez une feuille Excel , en différenciant facilement les tableaux et cellules sélectionnés dans la plage et le domaine.
- Donnez des formats conditionnels aux feuilles Excel, en recourant à une macro.
Afin de configurer le dégradé, vous pouvez également avoir une sous-section appelée objet ColorStop. Celui-ci contient une collection de tous les points d’arrêt ou de fin d’une couleur dans le dégradé. Nous soulignons que, à travers cet objet, la couleur peut être appliquée à l’intérieur d’une cellule ou d’une plage. Vous pouvez également modifier la couleur de l’apparence d’une feuille Microsoft Excel.
Par conséquent, les dégradés prédéfinis peuvent être utilisés ou si vous décidez de les créer à partir de zéro à votre convenance. Ensuite, nous expliquerons l’utilisation de la propriété Gradient pour ajouter des couleurs dégradées à l’intérieur des cellules à l’aide de macros.
Comment ajouter des dégradés avec des objets par défaut avec ColorStop
Il existe différentes méthodes et méthodes pour ajouter des dégradés aux cellules à l’aide de la propriété Gradient . Cependant, pour illustrer le processus de la manière la plus simple, nous utiliserons le langage de macro Microsoft Visual Basic connu sous le nom de Microsoft VBA.
Ensuite, nous expliquerons comment vous pouvez changer les première et deuxième couleurs d’un dégradé à l’aide de VBA pour Excel. Vous devez garder à l’esprit que les codes suivants expliqués étape par étape ne changeront que la couleur du dégradé . On suppose donc qu’un gradient existe déjà dans la cellule en question, alors:
- Tout d’abord, vous devez savoir que lors de la création d’un dégradé à l’aide de VBA, 2 objets ColorStop émergent de la collection du dégradé principal. Où l’un des objets d’arrêt de couleur aura la position 1 et l’autre la position 2.
- Maintenant, afin d’utiliser pleinement les propriétés du dégradé dans VBA , il est recommandé de changer les positions par défaut en 0 et 1. De cette façon, vous pouvez ajouter une position intermédiaire comme suit:
Sub main ()
Dim objColorStop As
ColorStop Dim lngColor1 As Long
Dim lngColor0 As Long
‘crée le dégradé dans la cellule A1
Range («A1»). Interior.Pattern = xlPatternLinearGradient
‘ change son orientation
Range («A1»). Interior.Gradient.Degree = 90
‘obtient le code couleur du premier objet
colorstop lngColor0 = Range («A1»). Interior.Gradient.ColorStops (1) .Color
‘obtient le code couleur du deuxième objet
colorstop lngColor1 = Range («A1»). Interior.Gradient.ColorStops (2) .Color
‘ efface le colostop précédent objets
Range («A1»). Interior.Gradient.ColorStops.Clear
‘crée un objet colorstop avec la position 0
Set objColorStop = Range («A1»). Interior.Gradient.ColorStops.Add (0)
‘ change sa couleur en première couleur
objColorStop.Color = lngColor0
‘crée un objet colorstop avec la position 1
Set objColorStop = Range («A1»). Interior.Gradient.ColorStops.Add (1)
‘ change sa couleur en la deuxième couleur
objColorStop.Color = lngColor1
End Sub
- Ce code crée un dégradé dans la cellule A1 et modifie les positions par défaut en 0 et 1.
Comment ajouter un dégradé avec plusieurs couleurs avec ColorStop
Pour créer un dégradé avec différentes couleurs à l’aide de macros dans une feuille Excel , le code suivant doit être suivi.
‘crée le dégradé dans la cellule A1
Range («A1»). Interior.Pattern = xlPatternLinearGradient
‘ change son orientation
Range («A1»). Interior.Gradient.Degree = 90
‘efface les précédents objets du colostop
Range («A1»). Interior.Gradient.ColorStops.Clear
‘Crée les arrêts de couleur pour le dégradé dans la cellule A1
Set objColorStop = Range («A1»). Interior.Gradient.ColorStops.Add (0)
objColorStop.Color = vbYellow
Set objColorStop = Range («A1″ ») .Interior.Gradient.ColorStops.Add (0.33)
objColorStop.Color = vbRed
Set objColorStop = Range (» A1 «). Interior.Gradient.ColorStops.Add (0.66)
objColorStop.Color = vbGreen
Set objColorStop = Range (A1» ) .Interior.Gradient.ColorStops.Add (1)
objColorStop.Color = vbBlue
End Sub
Nous espérons qu’avec ces instructions et conseils simples, vous apprendrez à ajouter des dégradés à des cellules à l’aide de la propriété Gradient dans une macro Excel. Si vous souhaitez également savoir comment les publications WordPress peuvent être affichées, ne perdez pas de temps, entrez ici.
