delphi像excel中添加公式报错
我从数据库将数据导出到excel中,想在单元格中加公式,但是不是确定的行数,要通过循环查询才知道是第几行,公式如下
MsExcel.WorkSheets[1].Cells[iRow,iCol+1].Formula:='=Sum(INDEX(B:B,'+inttostr(iRow)+')):INDEX(B:B,'+inttostr(iRowm)+'))';
但是这句话报错,OLE ERROR 800A03EC不知道该怎么修改,是不是这个公式写的不对呢?大家帮我看看,谢谢了!
[解决办法]
你公式错了..
多了个)
MsExcel.WorkSheets[1].Cells[iRow,iCol+1].Formula:='=Sum(INDEX(B:B,'+inttostr(iRow)+'):INDEX(B:B,'+inttostr(iRowm)+'))';