Re : VBA - Taduire une somme en VBA
Bonjour
ci-joint le code d'une somme pour une plage variable
à adapter à ton cas
Sub Montotal()
Dim Plage As Range, Ax&, By&, First, Last
By = ActiveCell.Column
Last = Cells(65536, By).End(xlUp).Row
Ax = 1
Cells(Ax, By).Formula = "=Sum(" & Cells(Ax + 1, By).Address & _
":" & Cells(Last, By).Address & ")"
End Sub
Cordialement
Flyonets