Additionner les cellules avec 7 et plus
Résolu
viret1290
Messages postés
146
Statut
Membre
-
viret1290 Messages postés 146 Statut Membre -
viret1290 Messages postés 146 Statut Membre -
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.
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.