Se connecter avec
S'enregistrer | Connectez-vous

Excel et VB : compter le nombre de cellules de la meme couleur

Dernière réponse : dans Programmation

est il possible avec VB sous Excel de comptabiliser le nombre de cellule de la meme couleur ?

j'ai obtenu ce code mais il ne marche pas :

Sub inventaireRouge()
sommeRouge = 0
compterRouge = 0
For Each cell In ActiveSheet.UsedRange
If cell.Interior.Color = vbRed Then
On Error Resume Next
sommeRouge = sommeRouge + cell.Value
On Error GoTo 0
compterRouge = compterRouge + 1
End If
Next
If compterRouge = 1 Then c = "cellule" Else c = "cellules"
MsgBox compterRouge & " " & c & " -- Total = " & sommeRouge
end if
End Sub

merci pour votre aide

Autres pages sur : excel compter nombre cellules couleur

Lassé par la pub ? Créez un compte
Lassé par la pub ? Créez un compte

Créer un nouveau sujet

Tom's guide dans le monde