Bonjour,
A mon sens, le plus simple dans ton cas est de passer par l'enregistreur de macro.
Tu actives l'enregistreur de macro, puis tu sélectionnes ta cellule AV9, tu entres ta formule et tu valides avec ENTREE, puis tu arrête l'enregistreur de macro.
Tu devrais obtenir quelque chose comme ceci :
1 2
| Range("AV9").Select
ActiveCell.FormulaR1C1 = "=IF(RC[-4]>0,RC[-2]*RC[-1],0)" |
A partir de là, il ne reste plus qu'à l'adapter pour écrire cette formule à toutes tes cellules, sans avoir recours à une boucle d'ailleurs !
Range("AV9:AV40").FormulaR1C1 = "=IF(RC[-4]>0,RC[-2]*RC[-1],0)"
Partager