Du Excel vers VBA

Bonsoir j'espere que vous allez bien

j'ai une question urgente

je veux transformer syntaxe en vba

=NB.SI.ENS($A$7:$A$247;">="&A7;$A$7:$A$247;"<="&Q7)

et l'implémenter dans une boucle

merci bcp

bonsoir, j'ai pas testé mais ça doit faire quelque chose comme :

Range("A1") = Application.WorksheetFunction.CountIf(Range("A7:A247"), ">"Range("Q7"))

avec un fichier excel d'exemple pour tester, ce serait plus simple

Hello,

Tu peux procéder de plusieurs façons, je t'en donne 2 :

Si tu veux insérer une formule dans ta feuille tu peux utiliser cette méthode :

[E1].FormulaLocal = "=NB.SI.ENS($A$7:$A$247;"">=""&A7;$A$7:$A$247;""<=""&Q7)"

Si tu veux indiquer uniquement le résultat dans la feuille, tu peux utiliser cette méthode :

[E2] = Application.WorksheetFunction.CountIfs([A7:A247], ">="&[A7], [A7:A247], "<="&[Q7])