Compter le cellules en vba

Résolu/Fermé
Tono88 Messages postés 13 Date d'inscription lundi 28 décembre 2009 Statut Membre Dernière intervention 3 janvier 2010 - 28 déc. 2009 à 10:29
Tono88 Messages postés 13 Date d'inscription lundi 28 décembre 2009 Statut Membre Dernière intervention 3 janvier 2010 - 28 déc. 2009 à 12:25
Bonjour,

Je voudrais savoir comment compter le nombre de cellules répondant a 2 conditions.
Je m'explique, j'ai un tableau avec comme colonne le nom, l'âge et la ville, et je voudrais compter le nombre de personnes qui habitent à Paris ET qui ont 23 ans.
Le tout sous vba.

Pour l'instant j'ai àa mais àa marche pas
nombre = Sheets("Tableau joueurs").CountIf(Range("N:N"), "Paris")and(Range("O:O"), 23)

Merci

2 réponses

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
28 déc. 2009 à 11:22
Bonjour,
Je ne sais pas si une "fonction" VBA telle que countif peux donner directement ce résultat, cependant, on l'obtient facilement par une petite boucle de ce style :
Sub comptage()
Dim nombre As Integer, derlig As Integer
derlig = Range("N65536").End(xlUp).Row
For i = 1 To derlig
If Range("N" & i) = "Paris" And Range("O" & i) = 23 Then
nombre = nombre + 1
End If
Next
MsgBox (nombre)
End Sub
0
Tono88 Messages postés 13 Date d'inscription lundi 28 décembre 2009 Statut Membre Dernière intervention 3 janvier 2010
28 déc. 2009 à 12:25
Parfait. Merci.
0