oui ça marche très bien merci beaucoup
j'ai seulement modifier D6:D20 par grandlivre[DEBIT]
maintenant Svp comment en VBA j'affecte cette fonction a une variable et la cellule G2 affiche que la valeur chaque fois que je clic sur le bouton AFFICHER
j'ai essayer ce macro mais ca marche pas
Sub Afficher()
Dim Ctr As Integer
Ctr = Application.Index("grandlivre[DEBIT]", EQUIV(VRAI, "grandlivre[DEBIT]" > 0, 0))
Range("g2").Value = Ctr
End Sub