Re,
Oui c'est vrai, je me suis trompé...
Dans mon cas j'ai besoin de faire des calculs à partir de valeurs contenues dans des cellules pour chaque ligne
en gros transformer cette partie de code en fonction:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
| 'Cote SI(V4="P";0;M4)
Range("W" & x) = Range("L" & x)
'Mise
Range("X" & x) = m
'Gain brut SI(X4="";"";W4*X4)
Range("Z" & x) = Range("W" & x) * Range("X" & x)
'Cumul mise SOMME($X$4:X4)
Range("Y" & x).FormulaLocal = "=SOMME($X$4:X4)"
'Cumul Gain SI(X4="";"";SOMME($Z$4:Z4))
Range("AA" & x).FormulaLocal = "=SOMME($Z$4:Z4)"
'Résultat net SI(X4="";"";SOMME($Z$4:Z4)-SOMME($X$4:X4))
Range("AB" & x).FormulaLocal = "=SOMME($Z$4:Z4)-SOMME($X$4:X4)" |
En sachant que cette fonction sera appelé pour chaque ligne où il y a un calcul à faire....
Donc dans ma fonction, ce sont des "range" qui évoluent....
c'est peut-être de ce genre là, si je fais une fonction juste pour la partie "Gain brut":
Function GainBrut(x As Range)
par contre pour le calcul ????????????
Range("Z" & x) = Range("W" & x) * Range("X" & x)
Bon je continue de chercher
seb
Partager