P
Pierrot
Guest
Bonsoir au Forum
Dans la fonction suivant j'ai toujour une valeur total=0, alors que je recherche le nbre de cellules coloriées en blanc.
J'ai beau avoir fait des recherches sur le forum, je ne trouve rien.
private sub comptecellulecouleur
Set MaPlage = Sheets("Feuil1").range("C3:C18").
Total = 0
For Each cell In MaPlage
If cell.interior.ColorIndex = 2 Then
total = total + 1
End If
Next
Sheets("Feuil1").Range("C20") = Total
end sub
Merci d'avance pour votre aide
Pierrot
Dans la fonction suivant j'ai toujour une valeur total=0, alors que je recherche le nbre de cellules coloriées en blanc.
J'ai beau avoir fait des recherches sur le forum, je ne trouve rien.
private sub comptecellulecouleur
Set MaPlage = Sheets("Feuil1").range("C3:C18").
Total = 0
For Each cell In MaPlage
If cell.interior.ColorIndex = 2 Then
total = total + 1
End If
Next
Sheets("Feuil1").Range("C20") = Total
end sub
Merci d'avance pour votre aide
Pierrot