Bonsoir à tous,
Pour poursuivre mon projet, je dois faire des totaux avec Evaluate sumproduct, pas de problème pour le mettre en place avec ce code:
sauf que j'ai 300 lignes et que j'aimerais faire une boucle plutôt que recopier cette ligne de code 300 fois, avez-vous une idée?
Merci encore pour votre aide.
Eric
Pour poursuivre mon projet, je dois faire des totaux avec Evaluate sumproduct, pas de problème pour le mettre en place avec ce code:
VB:
Sub TestSomme()
With Feuil1
Range("ap8").Value = Evaluate("SumProduct((h8:ao8) * (h7:ao7))")
Range("ap9").Value = Evaluate("SumProduct((h9:ao9) * (h7:ao7))")
'etc pour 130 lignes, aie!!!
End With
End SubMerci encore pour votre aide.
Eric