work good, thanks all



Bob Phillips a écrit dans le message ...
Application.SUM("D2:D" & Cells(Rows.Count,"D").End(xlUp).Row)

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Pierre" wrote in message
...
Hi all,

I have a macro that open a form

The user fill an excel sheet with this form

So i have a growing number of lines in the excel sheet.

I just want to sum colum D from the second line up to the end
and display the total on the form each time a line is created on the
excel
sheet

How can i do that?

regards,

Pierre