Intraweb con Delphi 7-Importar a Excel

[josejp1]

Incorpora un objeto TExcelApplication (ExcelApplication1), TExcelWorkSheet (WS)y TExcelWorkBook (WkBk) en tu form de intraweb
y para conectar con la hoja excel utiliza:

lcid := GetUserDefaultLCID;
ExcelApplication1.Visible[lcid] := True;
WkBk.ConnectTo(ExcelApplication1.Workbooks.Open(
< nombre de archivo >, // filename
0, //updatelinks
False, //readOnly
5, //format
'', //password
'', //writeResPassword
True, //ignoreReadOnlyRecommended
xlWindows, //origin
emptyParam,
True, //editable
True, //notify
1, //converter
False, //addtomru
emptyParam,
emptyParam,
lcid // lcid
)
);
WS.ConnectTo(WkBk.Worksheets[1] AS _Worksheet);
y para escribir datos en una celda:
WS.Cells.item[fila,columna].value := dato;