Comment pouvez-vous obtenir le nombre de cellules ou additionner toutes les cellules contenant une couleur de police particulière dans Excel? Par exemple, j'ai une plage de données dans une feuille de calcul comme illustré ci-dessous, et maintenant je veux respectivement compter ou additionner les cellules qui ont une couleur de police rouge, bleue et noire. Normalement, il n'y a pas de moyen direct de traiter cette tâche, ici, je vais parler de quelques astuces pour résoudre ce travail.
Comptez ou additionnez les cellules en fonction de la couleur de la police avec une fonctionnalité incroyable-Count by Color
Pour calculer le nombre de cellules avec des couleurs de police spécifiques, procédez comme suit:
1. Maintenez le ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez insérer > Moduleet collez le code suivant dans le Fenêtre du module.
Code VBA: comptez les cellules en fonction des couleurs de police:
Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double
'Update by Extendoffice
Application.Volatile
Dim rng As Range
For Each rng In pRange1
If rng.Font.Color = pRange2.Font.Color Then
CountColour = CountColour + 1
End If
Next
End Function
3. Enregistrez ensuite ce code et revenez à la feuille de calcul, puis entrez cette formule dans une cellule vide = CountColour (A1: D10, A2) , voir capture d'écran:
Notes: Dans la formule ci-dessus, A1: D10 est la plage que vous souhaitez utiliser et A2 est la cellule avec une couleur de police particulière que vous souhaitez compter.
4. Après avoir tapé la formule, appuyez sur Entrer clé, et vous obtiendrez le nombre de cellules avec des couleurs de police rouges. Si vous souhaitez compter d'autres cellules de couleur de police, veuillez saisir à plusieurs reprises la formule selon vos besoins. Vous obtiendrez les résultats suivants:
Pour additionner les cellules en fonction des couleurs de police, la fonction définie par l'utilisateur suivante peut vous aider.
1. Maintenez le ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez insérer > Moduleet collez le code suivant dans le Fenêtre du module.
Code VBA: somme des cellules en fonction des couleurs de police:
Public Function SumByColor(pRange1 As Range, pRange2 As Range) As Double
'Update by Extendoffice
Application.Volatile
Dim rng As Range
Dim xTotal As Double
xTotal = 0
For Each rng In pRange1
If rng.Font.Color = pRange2.Font.Color Then
xTotal = xTotal + rng.Value
End If
Next
SumByColor = xTotal
End Function
3. Enregistrez ensuite ce code et revenez à la feuille de calcul d'origine, puis entrez cette formule = SumByColor (A1: D8, A1) dans une cellule vide, voir capture d'écran:
Notes: Dans la formule ci-dessus, A1: D10 est la plage que vous souhaitez utiliser et A2 est la cellule avec une couleur de police particulière que vous souhaitez additionner.
4. Puis appuyez Entrer clé, et vous ajouterez toutes les cellules avec des couleurs de police rouges. Si vous souhaitez additionner d'autres cellules de couleur de police, veuillez saisir à plusieurs reprises la formule. Vous obtiendrez le résultat suivant:
Peut-être que la fonction définie par l'utilisateur est difficile à enregistrer et à appliquer, ici, je vous recommanderai un outil pratique-Kutools pour Excel, avec ses fonctions avancées, vous pouvez résoudre cette tâche rapidement et facilement.
Conseils:Appliquer cette COUNTBYFONTCOLOR et d' SUMBYFONTCOLOR fonctionnalités, tout d'abord, vous devez télécharger le Kutools pour Excel, puis appliquez la fonction rapidement et facilement.
Après l'installation de Kutools pour Excel, veuillez faire comme ceci:
1. Cliquez sur une cellule dans laquelle vous souhaitez placer le résultat du comptage, puis cliquez sur Kutools > Fonctions Kutools > Statistiques et mathématiques > COUNTBYFONTCOLOR, voir capture d'écran:
2. Dans le Arguments de fonction boîte de dialogue, spécifiez la plage de données et la cellule d'index de couleur que vous souhaitez compter par couleur de police, voir capture d'écran:
3. Et puis, cliquez OK bouton, vous obtiendrez le premier résultat de comptage, pour obtenir d'autres résultats, il vous suffit de copier cette formule et de modifier les références de cellule selon vos besoins. Voir la capture d'écran:
1. Cliquez sur une cellule dans laquelle vous souhaitez placer le résultat du comptage, puis cliquez sur Kutools > Fonctions Kutools > Statistiques et mathématiques > SUMBYFONTCOLOR, voir capture d'écran:
2. Dans le Arguments de fonction boîte de dialogue, spécifiez la plage de données et la cellule d'index de couleur que vous souhaitez additionner par couleur de police, voir capture d'écran:
3. Et puis, cliquez OK bouton, vous obtiendrez le premier résultat de la somme, pour obtenir d'autres résultats, il vous suffit de copier cette formule et de modifier les références de cellule selon vos besoins. Voir la capture d'écran:
Cliquez pour télécharger Kutools pour Excel et un essai gratuit maintenant!
Kutools pour Excel fournit également une fonctionnalité simple Compter par couleur, avec cet utilitaire, vous pouvez obtenir rapidement le résultat du calcul tel que le nombre, la somme, les cellules moyennes, etc. par la couleur d'arrière-plan, la couleur de la police, la mise en forme conditionnelle selon vos besoins.
Conseils:Appliquer cette Compter par couleur fonctionnalité, tout d'abord, vous devez télécharger le Kutools pour Excel, puis appliquez la fonction rapidement et facilement.
Après l'installation de Kutools pour Excel, veuillez faire comme ceci:
1. Sélectionnez la plage de données que vous souhaitez compter et additionner en fonction de différentes couleurs.
2. Cliquez Kutools Plus> Compter par couleur, voir capture d'écran:
3. Dans le Compter par couleur boîte de dialogue, choisissez Formatage standard du Méthode de couleur déroulant et sélectionnez Fonte sous le Type de comptage déroulant, et les cellules avec les mêmes couleurs de police ont été comptées, additionnées, moyennées et ainsi de suite, voir capture d'écran:
4. Et puis cliquez Générer un rapport bouton, vous obtiendrez les statistiques dans un nouveau classeur. Voir la capture d'écran:
Cliquez pour télécharger Kutools pour Excel et un essai gratuit maintenant!
