Salut, Dth.
Tu as failli me rater pour 1 minute, j'allais arrêter l'ordi.
Bon, CbxMois.listindex+1, c'était une astuce pour convertir le mois choisi (en lettre) en chiffre de 1 à 12.
Listindex, c'est l'index de l'élément choisi dans la liste, sachant que le premier (à savoir janvier) vaut 0.
Si tu choisis Mars, c'est le troisième élément; Listindex vaut alors 2.
Donc CbxMois.listindex+1 vaut bien 3, numéro de mois de mars.
Pour l'année, il faut directement comparer l'année de la cellule au contenu de CbxAnnée, qui contient bien les années en chiffres.
Seul petit truc, un combobox, même s'il contient des chiffres, renvoit une chaîne de caractère.
si year(DateValue(Cells(i,2)) vaut 2003, et que le combo vaut "2003", VBA considère qu'ils ne sont pas égaux.
Astuce: convertir la chaîne de caractère du combobox en numérique.
Donc voilà la syntaxe qu'il te faut:
If Year(DateValue(Cells(i, 2))) = Val(CbxAnnée) Then Résultat = Résultat + val(Cells(i, 3))
Bonne fin de soirée, et bon dimanche à tous.
Laurent.