Bonjour,
VB m'affiche erreur type 13
Sub addition()
For lig = 5 To Sheets("PAIEMENT").Range("D3").Value
Sheets("CALCUL2").Cells(lig, 3).Value = Sheets("PAIEMENT").Cells(lig, 2) + Sheets("PAIEMENT").Cells(lig, 4)
Next lig
End Sub
Il l'affiche sur la ligne mise en gras...