Code: Select all
XLSReadWriteII51.FileName:='C:\XLSRW.xlsx';
XLSReadWriteII51.Sheets[0].AsFloat[1, 2]:=10;
XLSReadWriteII51.Sheets[0].AsFloat[1, 3]:=20;
XLSReadWriteII51[0].AsFormula[1, 1]:='B3/B4';
XLSReadWriteII51[0].InsertRows(2, 1);
XLSReadWriteII51.Formulas.Calculate;
XLSReadWriteII51.Write;