Xavier
Tu as fumé, lol. Xavier li ne faut pas recopier les codes que l'ont te donnent, sans essayer de les comprendre. Tu vas pas faire beaucoup de progrès, si tu ne les analyses pas.
Worksheets("communication").Select
TextBox4.Value = WorksheetFunction.Sum(Range("D14:014"))
@+Jean-Marie