répétition d'une couleur de cellule dans une colo

la meule · 4 Mai 2005

Bonjour à toutes et à tous.
Dans une colonne,j'ai un certain nombre de cellules sur fond rouge.Comment faire pour que excel me dise le nombre de cellules rouges dans la colonne?Merci

Rénato · 4 Mai 2005

Bonjour La meule,

Et voici une t'ite macro qui devrait faire l'affaire :

Sub NombredeCellRouge()
Dim Cellule As Range
Dim total As Variant
For Each Cellule In Range('B:B')
If Cellule.Interior.ColorIndex = 3 Then
total = total + Cellule.Count
End If
Next
MsgBox 'Eh, La Meule,il y a ' & total & ' Cellules rouges en colonne B ! '
Range('A1') = total
End Sub

Petite précision, si les fonds de cellules sont générés à partir de M.F.C. ce code ne marchera pas, on peut cependant le faire par une formule reprenant les conditions de ton format conditionnel. (Ex : si la valeur 1 génère le motif rouge =NB.SI(B:B;1))

Bonne soirée

Message édité par: Rénato, à: 04/05/2005 21:30

Message édité par: Rénato, à: 04/05/2005 22:00

répétition d'une couleur de cellule dans une colo

la meule

Guest

Rénato

XLDnaute Occasionnel

Discussions similaires

répétition d'une couleur de cellule dans une colo

la meule

Guest

Rénato

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency