读书人

delphi像excel中添加公式报错解决方法

发布时间: 2013-12-06 17:56:43 作者: rapoo

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)+'))';

读书人网 >.NET

热点推荐