Table des matières
Dans Excel, il n'existe pas de fonction permettant d'effectuer des calculs sur la base de la couleur des cellules. Microsoft Visual Basic pour les applications (VBA) il est possible de créer des fonctions personnalisées pour le calcul basé sur la couleur des cellules. Dans cet article, je vais vous montrer comment créer et utiliser la ColorFunction dans Excel.
Supposons que nous ayons un jeu de données sur les commandes de produits d'une entreprise. La colonne Quantité commandée Les commandes livrées sont colorées en vert clair et les commandes en cours de livraison sont colorées en orange clair. Maintenant, nous pouvons trouver le nombre de clients qui ont reçu ou n'ont pas reçu leurs commandes en comptant les mêmes cellules colorées. La quantité totale de commandes livrées ou en cours de livraison peut être trouvée en additionnant les mêmes cellules colorées.
Télécharger le cahier d'exercices
Fonction de couleur dans Excel.xlsmColorFunction dans Excel
Étape 1 : Ouverture du module macro dans la fenêtre VBA
Tout d'abord, vous devez ouvrir le VBA en appuyant sur ALT+F11. Après cela, faites un clic droit sur le nom de la feuille dans le panneau de gauche et allez à Insertion> ; Module
Par conséquent, un Module La boîte sera ouverte.
Étape 2 : Insertion du code VBA pour la création de ColorFunction
Insérez le code suivant, dans le fichier Module et fermez la fenêtre VBA fenêtre.
Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean) Dim rCell As Range Dim lCol As Long Dim vResult lCol = rColor.Interior.ColorIndex If SUM = True Then For Each rCell In rRange If rCell.Interior.ColorIndex = lCol Then vResult = WorksheetFunction.SUM(rCell, vResult) End If Next rCell Else For Each rCell In rRange If rCell.Interior.ColorIndex = lCol Then vResult = 1 +vResult End If Next rCell End If ColorFunction = vResult End Function
Ici, le code VBA crée une fonction personnalisée nommée CouleurFonction qui comptera les cellules colorées si nous donnons l'argument en tant que FAUX et fera la somme des cellules colorées si nous donnons l'argument comme suit VRAI.
Étape 3 Enregistrement du classeur en tant que classeur compatible avec les macros Excel.
Vous devez enregistrer le classeur Excel dans .xlsm pour sauvegarder votre fonction personnalisée. Tout d'abord, allez à Fichier dans le coin supérieur gauche de votre fenêtre Excel.
Après cela, sélectionnez Sauvez comme.
Sélectionnez ensuite Classeur Excel compatible avec les macros (*xlsm) et cliquez sur Économisez.
Étape 4 : Utiliser ColorFunction pour compter les cellules colorées
Vous pouvez maintenant utiliser votre CouleurFonction.
Pour obtenir le nombre de cellules vert clair, tapez la formule suivante dans une cellule vide,
=ColorFunction(F5,$D$5:$D$11,FALSE)
Ici, F5 = Cellule de critère dont la couleur sera comptée
D$5:$D$11 = Gamme pour le comptage
FAUX indique que le nombre de cellules ayant la même couleur que la cellule de critère sera compté.
Appuyez sur ENTER et vous obtiendrez le compte des cellules vert clair.
De la même manière, vous pouvez obtenir le compte des cellules orange clair.
Étape 5 : Utilisation de ColorFunction pour additionner des cellules colorées
Pour obtenir la somme des cellules de couleur vert clair, tapez la formule suivante dans une cellule vide,
=ColorFunction(F5,$D$5:$D$11,TRUE)
Ici, F5 = Cellule de critère dont la couleur sera additionnée
D$5:$D$11 = Plage pour la somme
VRAI indique que le nombre de cellules ayant la même couleur que la cellule de critère sera additionné.
vous obtiendrez la somme des cellules vert clair en appuyant sur ENTER.
De la même manière, vous pouvez obtenir la somme des cellules orange clair.
Autres façons de compter et d'additionner les cellules colorées
Au lieu d'utiliser CouleurFonction, vous pouvez obtenir le nombre de cellules colorées ou additionner les cellules colorées de deux manières différentes.
1. utilisation des fonctions FILTRE et SOUS-TOTAL
Vous pouvez obtenir le nombre et la somme des cellules colorées en utilisant Filtre et la fonction SUBTOTAL .
Tout d'abord, allez sur le site Données et cliquez sur Filtre.
Ensuite, une flèche descendante apparaîtra à côté de chaque en-tête de colonne. Cliquez sur la flèche descendante à côté de l'en-tête de colonne. Quantité commandée (colonne colorée), allez à Filtrer par couleur et sélectionnez la couleur vert clair.
Maintenant, vous ne verrez que des données de couleur vert clair dans cette colonne. Pour obtenir le compte, tapez la formule suivante,
=SOUS-TOTAL(2,D5:D11)
Ici 2 indique que la cellule sera comptée et D5:D11 est l'étendue des données.
Après avoir appuyé sur ENTER vous obtiendrez le nombre de cellules de couleur vert clair.
Pour obtenir la somme des cellules colorées, tapez la formule suivante,
=SOUS-TOTAL(9,D5:D11)
Ici 9 indique que la cellule sera additionnée et D5:D11 est la gamme de données
Après avoir appuyé sur ENTER vous obtiendrez la somme des cellules de couleur vert clair.
En changeant le filtre en couleur orange clair, vous pouvez obtenir le nombre et la somme des cellules de couleur orange.
2. utilisation de la fonction GET.CELL
En utilisant le GET.CELL vous pouvez également compter et additionner les cellules colorées.
Tout d'abord, allez sur le site Formules et sélectionnez Définir le nom.
A Nouveau nom Tapez un nom tel que Couleur dans le Nom et insérez la formule dans Fait référence à et appuyez sur OK.
=GET.CELL(38, 'GET CELL'!$D5)
Ici, 38 indique que la formule donnera le code couleur de la cellule référencée et GET CELL!$D5 est la cellule référencée (la première cellule après l'en-tête de la colonne colorée)
Tapez maintenant =Couleur (Nom que vous avez donné précédemment dans le Définir les noms ) dans la colonne adjacente de votre colonne colorée.
Après avoir appuyé sur ENTER et en faisant glisser la cellule E5 à la fin de votre ensemble de données, vous obtiendrez les codes de couleur de toutes vos cellules colorées de la colonne E .
Maintenant, tapez la formule suivante pour obtenir le nombre de cellules de couleur vert clair
=COUNTIF($E$5:$E$11,50)
Ici, E$5:E$11 est la plage de comptage, et 50 est le code couleur du vert clair.
Après avoir appuyé sur Entrez vous obtiendrez le nombre de cellules de couleur verte.
Tapez la formule suivante pour obtenir la somme des cellules de couleur vert clair,
=SUMIF(E5:E11,50,D5:D11)
Ici, E5:E11 est la gamme de critères, 50 indique le code de couleur vert clair et D5:D11 est l'étendue de la somme.
Appuyez sur ENTER et vous obtiendrez la somme de toutes les cellules colorées en vert.
De la même manière, vous pouvez obtenir le nombre et la somme des cellules de couleur orange clair.
Conclusion
J'espère qu'après avoir parcouru l'article, vous pouvez maintenant créer et utiliser ColorFunction dans Excel. Si vous rencontrez un problème, veuillez laisser un commentaire.