高分求教，如何在delphi中用命令在excel中插入一行

Question

目前以有变量
wkbk:_workbook;
我使用wkbk.rows.insert;但是不成功。
我的目的就是在指定的行数新插入一行，格式与目前的相同。
使用循环，由一个变量控制插入的行数。请高手赐教！

Answer 1

ExcelApp.ActiveSheet.Rows[2].Insert;
ExcelApplication1.ActiveSheet.Rows[2].Insert;（SERVER组件）

Answer 2

同意以上意见。
同时还有一个插入大批数据的方法。
利用SQL的一个函数OPENDATASOURCE，例如：
insert into OpenDataSource('Microsoft.Jet.OLEDB.4.0',
  'Data Source="e:\book1.xls";
User ID=Admin;Password=;Extended properties=Excel 5.0')...[sheet$]
select [字段] from [dbo]

Answer 3

很遗憾，我用的是DELPHI 7
而且我没有使用worksheet，我用的是workbook。但是不管怎样这两个组件都没有rows选项。
编译时出现Undeclared Identifier:'Rows'
我也试过使用wbst.rows.insert;(其中的wbst是已经被设为Activate)但是insert是函数，function Insert(Shift:OleVariant);
并且小弟只懂一点c语言和面向对象,也不晓得那个函数的参数怎么写。
希望各位再帮帮忙。

Answer 4

var qzw: Variant;
qzw:=excelworksheet2.rows;
qzw.rows[10].insert;
如用SERVER组件