Bonjour,

Avez vous une idée de comment je pourrais automatiser ceci ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Range("C26").FormulaR1C1 = "=SUM(R2C2:R[-22]C[1])"
Range("D26").FormulaR1C1 = "=SUM(R2C3:R[-22]C[1])"
Range("E26").FormulaR1C1 = "=SUM(R2C4:R[-22]C[1])"
Range("F26").FormulaR1C1 = "=SUM(R2C5:R[-22]C[1])"
Range("G26").FormulaR1C1 = "=SUM(R2C6:R[-22]C[1])"
Merci à tous!