Additionner les cellules avec 7 et plus

Résolu/Fermé
viret1290 Messages postés 141 Date d'inscription samedi 17 août 2013 Statut Membre Dernière intervention 28 juillet 2024 - 13 déc. 2015 à 10:08
viret1290 Messages postés 141 Date d'inscription samedi 17 août 2013 Statut Membre Dernière intervention 28 juillet 2024 - 13 déc. 2015 à 11:09
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 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
13 déc. 2015 à 10:58
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 samedi 17 août 2013 Statut Membre Dernière intervention 28 juillet 2024 2
13 déc. 2015 à 11:09
Merci beaucoup
1