nae racaru wrote Luminati-ma si pe mine, please, cum pot face subtotaluri intr-un sheet excel obtinut prin automation. Grig ne-a prezentat la curs, din helpul  Excel-ului, cum ajungem la clasele, proprietatile, metodele etc. din excel dar, din nefericire, nu mi-am notat (atat eram de concentrat la ce spunea) si acum nu stiu cum sa ajung acolo.

Sper sa nu fie prea tarziu:

oExcel = CreateObject("Excel.Application")
oExcel.Visible = .T.
oExcel.Workbooks.Add
oExcel.Range("A1:A1") = 1
oExcel.Range("A2:A2") = 2
oExcel.Range("A3:A3") = 3
oExcel.Range("A4:A4") = "=SUM(A1:A3)"