>Hi,
>After I Export a file to a Excel worksheet,
>how can I sum up a column and give a total at the last row ?
>
>Please advise.
>
>Derek

Assuming you would sum column 4:

With oExcel.activeworkbook.activesheet
  .Columns(4).Rows( .usedrange.Rows.Count + 1 ).FormulaR1C1 = ;
    TEXTMERGE("=SUM(R1C4:R<<.usedrange.rows.Count>>C4)")
Endwith

Cetin