Essaie, tu verras bien.
Mon message précédent concernait la livraison client unique, où il n'y a pas besoin de stocker dans Var le montant total, car il n'y en a qu'un.
Pour les multi livraisons (plusieurs clients), tant qu'on a pas décoché "Autre client", les montants pour chaque client sont stockés dans Var et lors de la dernière saisie (dernier client) pour ce chauffeur, on décoche et on saisit Vst Loomis et (ou) vst CS. La colonne G (Diff) affiche la différence entre Var (tout ce qui a été stocké) et la somme de E et F.
Si la saisie se fait sans erreur, il n'est pas nécessaire de modifier la dernière séquence.
Remets ce code à la place du précédent
If CheckBox1 = False Then 'si client unique
If TextBox9 <> "" Then
.Range("I" & ligne) = CDbl(Application.WorksheetFunction.Substitute(TextBox9.Value, ".", ","))
If Var > 0 Then 'on contrôle que c'est la dernière sequence d'une saisie multi-clients
Var = Var + .Range("I" & ligne).Value 'TextBox9
.Range("G" & ligne) = (.Range("E" & ligne) + .Range("F" & ligne)) - Var
Else
.Range("G" & ligne) = (.Range("E" & ligne) + .Range("F" & ligne)) - .Range("I" & ligne).Value
End If
End If
Henri