A voir également:
- [VBA] total des cellules de couleurs
- Total uninstall - Télécharger - Divers Utilitaires
- Excel compter cellule couleur sans vba - Guide
- Verrouiller des cellules excel - Guide
- Formule excel pour additionner plusieurs cellules - Guide
- Total video converter - Télécharger - Conversion & Codecs
2 réponses
salut vyoxil,
A toi d'adapter ce code à ton besoin :
A toi d'adapter ce code à ton besoin :
Sub CompteCouleurs()
Dim rngCell As Range
Dim intNbCouleurs As Integer
For Each rngCell In Range("A1:G30").Cells
If rngCell.Interior.ColorIndex = 3 Then
intNbCouleurs = intNbCouleurs + 1
End If
Next
MsgBox intNbCouleurs & " cellules rouges"
End Sub
