Note: The other languages of the website are Google-translated. Back to English
Se connecter  \/ 
x
or
x
INSCRIPTION  \/ 
x

or

Comment compter / additionner les cellules par couleurs avec mise en forme conditionnelle dans Excel?

Dans Excel, vous pouvez colorer certaines cellules à l'aide de la mise en forme conditionnelle. Maintenant, ce didacticiel vous expliquera quelques méthodes pratiques et simples pour compter ou additionner rapidement les cellules par couleur avec une mise en forme conditionnelle dans Excel.

Compter les cellules par couleur de police et arrière-plan par VBA

Compter / additionner les cellules par couleur de police avec mise en forme conditionnelle par Kutools for Excel bonne idée3      jeux et sport

Compter / additionner les cellules par couleur d'arrière-plan avec mise en forme conditionnelle par Kutools for Excel bonne idée3      jeux et sport


flèche bleue bulle droite Compter les cellules par police et couleur d'arrière-plan par VBA

Dans Excel, seul le code VBA peut compter rapidement les cellules en fonction d'une police et d'une couleur d'arrière-plan spécifiques.

1. presse Alt + F11 clés pour ouvrir Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Module et copiez et collez ci-dessous le code VBA dans le popping Module fenêtre.

VBA: compte les cellules en fonction d'une police et d'une couleur d'arrière-plan.

Sub DisplayFormatCount()
	'Updateby20150305
	Dim Rng As Range
	Dim CountRange As Range
	Dim ColorRange As Range
	Dim xBackColor As Long
	Dim xFontColor As Long
	On Error Resume Next
	xTitleId       = "KutoolsforExcel"
	Set CountRange = Application.Selection
	Set CountRange = Application.InputBox("Count Range :", xTitleId, CountRange.Address, Type: = 8)
	Set ColorRange = Application.InputBox("Color Range(single cell):", xTitleId, Type: = 8)
	Set ColorRange = ColorRange.Range("A1")
	xReturn        = 0
	For Each Rng In CountRange
		qqq           = Rng.Value
		xxx           = Rng.DisplayFormat.Interior.Color
		If Rng.DisplayFormat.Interior.Color = ColorRange.DisplayFormat.Interior.Color Then
			xBackColor   = xBackColor + 1
		End If
		If Rng.DisplayFormat.Font.Color = ColorRange.DisplayFormat.Font.Color Then
			xFontColor = xFontColor + 1
		End If
	Next
	MsgBox "BackColor is " & xBackColor & Chr(10) & "FontColor is " & xFontColor
End Sub

3. Cliquez course bouton ou appuyez sur F5 pour exécuter le code, puis sélectionnez la plage dont vous avez besoin dans la boîte de dialogue contextuelle. Voir la capture d'écran:
doc-count-by-condition-color-1

4. Cliquez OK, puis sélectionnez une cellule dont vous souhaitez compter les cellules en fonction de la police et de la couleur d'arrière-plan. Voir la capture d'écran:

doc-count-by-condition-color-2

5. Cliquez OK. Ensuite, une boîte de dialogue apparaît pour vous dire combien de cellules ont la même couleur d'arrière-plan et la même couleur de police que la cellule sélectionnée dans la plage.

doc-count-by-condition-color-3


flèche bleue bulle droite Compter / additionner les cellules par couleur de police avec mise en forme conditionnelle par Kutools for Excel

Dans Excel, vous ne pouvez pas compter ou additionner les cellules par couleur de police avec une mise en forme conditionnelle uniquement. Cependant, il existe un complément pratique appelé Kutools pour Excel qui peut vous aider à résoudre rapidement ce problème grâce à son Compter par couleur fonction.

Kutools pour Excel, avec plus de 300 fonctions pratiques, rend vos travaux plus faciles. 

Après installation gratuite Kutools for Excel, procédez comme suit:

1. Sélectionnez une plage que vous souhaitez compter ou additionner les cellules par couleur de police avec mise en forme conditionnelle, puis cliquez sur Kutools Plus> Compter par couleur. Voir la capture d'écran:

doc-count-by-condition-color-4

2. Puis dans le Compter par couleur dialogue, sélectionnez Mise en forme conditionnelle sous Méthode de couleur liste et Fonte sous Type de couleur liste. Ensuite, vous pouvez afficher le résultat du comptage et de la somme dans la boîte de dialogue. Voir la capture d'écran:

doc-count-by-condition-color-5

Notes: Si vous souhaitez afficher le résultat du calcul sous forme de rapport, vous pouvez cliquer sur Générer un rapport iAu niveau de Compter par couleur boîte de dialogue, puis un rapport sera créé dans un nouveau classeur. Voir la capture d'écran:

doc-count-by-condition-color-6      doc-count-by-condition-color-7


Compter / additionner les cellules par couleur d'arrière-plan avec mise en forme conditionnelle par Kutools for Excel

Si vous souhaitez compter ou additionner les cellules par couleur d'arrière-plan avec mise en forme conditionnelle, vous pouvez également appliquer Compter par couleur utilité de Kutools pour Excel.

1. Sélectionnez une plage que vous souhaitez compter ou additionner les cellules par couleur d'arrière-plan avec mise en forme conditionnelle, puis cliquez sur Kutools Plus > Compter par couleur.

Après installation gratuite Kutools for Excel, procédez comme suit:

2. Puis dans le Compter par couleur dialogue, sélectionnez Mise en forme conditionnelle sous Méthode de couleur liste et Contexte sous Type de couleur liste. Ensuite, vous pouvez afficher le résultat du comptage et de la somme dans la boîte de dialogue. Voir la capture d'écran:

doc-count-by-condition-color-8

Notes: Si vous souhaitez afficher le résultat du calcul sous forme de rapport, vous pouvez cliquer sur Générer un rapport et Compter par couleur boîte de dialogue, puis un rapport sera créé dans un nouveau classeur. Voir la capture d'écran:

doc-count-by-condition-color-9

Cliquez ici pour en savoir plus sur le nombre par couleur.

Pointe.Avec Compter par couleur utilitaire, vous pouvez également compter / additionner / faire la moyenne des cellules par couleur d'arrière-plan ou couleur de police avec un formatage standard uniquement ou les deux formatage standard et conditionnel. Si vous souhaitez appliquer Compte par couleur sans limitation dans 30 jours, s'il vous plaît télécharger et avoir un essai gratuit maintenant.


flèche bleue bulle droite Calculer les cellules par couleur de police ou couleur d'arrière-plan



Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtrée...
  • Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammes...
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellules...
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF...
  • Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.
onglet kte 201905

Office Tab apporte une interface à onglets à Office et simplifie considérablement votre travail

  • Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
bas de cabine
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    h_heathfield@yahoo.com.au · 2 years ago
    Hi,

    This is a great piece of VBA and works perfectly. Are you able to modify this code to make it a function and then be used as a formula?

    e.g.
    =DisplayFormatCount(A14:E14,A2,False) for counting background colour (Count Range, Colour Match Cell, type)

    =DisplayFormatCount(C29:D29,A2,True) for counting font colour

    I would like to you something like this for an input form of many tables and validation fields that are compulsory. I would then be able to count how many fields that have not been completed correctly.


    Cheers
  • To post as a guest, your comment is unpublished.
    Rajendhar · 3 years ago
    Could you please teach me VBA codes I would like to learn VBA using excel sheet
  • To post as a guest, your comment is unpublished.
    tranvanlong.dne@gmail.com · 3 years ago
    Chào bạn.

    VBA đếm ô màu rất hay, tuy nhiên bạn có thể sửa giúp mình để kết quả không hiện thành msg box mà hiện luôn trên ô excel chỉ định được không? thêm cả hàm sum, average nữa thì càng tốt :D . Mail của mình là tranvanlong.dne@gmail.com. Mình cám ơn.
  • To post as a guest, your comment is unpublished.
    falina · 3 years ago
    Hi,
    How do I modified the code for the cell contain conditional formatting? Because it count the background as "blank".


    Thanks.
    • To post as a guest, your comment is unpublished.
      Sunny · 3 years ago
      Sorry I have no idea about the VBA code.
  • To post as a guest, your comment is unpublished.
    Morton Wakeland · 6 years ago
    May I congratulate you on a most easily understood and well written VBA program to perform such a simple task - i.e., count the number of cells with a specific color derived from Conditional Formatting.
    It beats the pants of the monster program by Pearson, and his does not even work, at least in Excel 2013. Nor do other supposed counting programs work that I have tried. Yours is the only one!! This worked perfectly.
    Thank you, thank you, thank you.
    Best Holiday Wishes,
    Mort in Dallas
    • To post as a guest, your comment is unpublished.
      Naresh · 4 years ago
      hi


      kindly send the above VBA code same code is I need please help.