Une solution peut consister à créer une fonction personnalisée permettant de faire ce calcul. Ouvrir l'éditeur de macro, dans le menu outils / macro / visual basic editor, une fois l'éditeur lancé dans l'aborescence en haut à gauche faire un clic droit sur le classeur puis choisir insertion puis module. Ouvrir le module et coller le code suivant :
Code :
- Function MonProduit(iDeb As Integer, iFin As Integer)
- Dim iLoop As Integer
- Dim lSomme As Long
- lSomme = 0
- For iLoop = iDeb To iFin
- lSomme = lSomme + (Range("A" & iLoop).Value * Range("D" & iLoop).Value)
- Next
- MonProduit = lSomme
- End Function
|
Une fois cela fait retourner dans la feuille de calcul et mettre la formule du type :
=MonProduit(1;100)
Il y a peut être plus simple mais ca fonctionne.