Bonjour,
je souhaite utiliser la formule NB.SI(I$4:I$4099;">-y") dans VBA mais il se bloque à la ligne 7
je ne vois pas le pb, j'ai tenté d'autre façon d'écrire sans succès

j'ai bien vu ce sujet https://www.developpez.net/forums/d1...efinie-boucle/ mais il ne met pas la solution

voyez vous l'erreur de syntaxe?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
            'calcul du nombre de valeurs suppérieur à -10,-11,-12,-13,..,-20
            Y = 10
            For X = 8205 To 8215
            'cellule(x,I)=appliquer formule (=NB.SI(I$4:I$4099;">-y"))
            Set MaPlage = Range(Cells(4, 9), Cells(iDerLig, 9))
            Cells(X, 9) = Application.WorksheetFunction.CountIf(MaPlage, "" > -"&y&""")
            Y = Y + 1
            Next