Additionner les cellules avec 7 et plus

Résolu
viret1290 Messages postés 141 Date d'inscription   Statut Membre Dernière intervention   -  
viret1290 Messages postés 141 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je désirs compter les cellules qui contient le nombre 7 et plus.
voici mon bout de code,

If FMicasaComplet.Cells(i, 1) <> "" And FMicasaComplet.Cells(i, 28) = FStatMicasa.Cells(j, 4) And FMicasaComplet.Cells(i, 8) >= "7" Then
FStatMicasa.Cells(j, 16) = FStatMicasa.Cells(j, 16) + 1
End If

mais il compte les cellules qui contient les chiffres de 7 à 9, mais les chiffres 10 et plus ne sont pas compter.

Pouvez-vous me dire ou est l'erreur ou me le corriger.

Merci infiniment.
A voir également:

2 réponses

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Si vos cellules sont des numeriques (chiffres de 0 a 9 et nombres 10 a .....)
FMicasaComplet.Cells(i, 8) >= "7" ici c'est un caracteres alphanumerique pas du numerique

FMicasaComplet.Cells(i, 8) >= 7
1
viret1290 Messages postés 141 Date d'inscription   Statut Membre Dernière intervention   2
 
Merci beaucoup
1