Utiliser Fonction Excel en VBA avec opérateurs
Bonjour tout le monde,
Je ne parviens pas à recopier la formule suivante en VBA.
Objectif : Multiplier ou soustraire des chiffres à l'aide des fonctions Excel depuis VBA.
Mon code en VBA me renvoi en cellule ("C4") le message #VALEUR.
Voici la formule sur Excel (qui fonctionne) :
=1-(NB.SI('Stock(L2)'!D4:D1003;"<0")/1000)
Voici mon code VBA:
Dim CNiveau_moyen_service as Variant
Dim r as variant
Sheets(nom_feuil_stock).Activate
CNiveau_moyen_service = "= 1 -((COUNTIF(D4:D1003,""<0""))/1000"
r = Evaluate(CNiveau_moyen_service)
Worksheets("KPI").Range("C4").Value = r
Je rencontre aussi le problème pour effectuer une multiplication comme :
=(NB.SI('Stock(L2)'!H4:H1003;">0")*10)/1000.
Impossible à faire en VBA ?
Je vous remercie par avance.
Bonjour Invaliduser, bonjour le forum,
Une idée. Lance l'enregistreur de macro, écrit la formule dans une cellule, stoppe l'enregistreur, lit le résultat avec VBE (l'éditeur VBA)...