delphi控制excel ,在指定单元格后插入行

//– 在别名为‘test1’的单元格后面插入行
EApp.ActiveSheet.Rows[EApp.ActiveSheet.Range[‘test1’].row+1].Insert;
//–写入值
EApp.WorkSheets[1].Cells[EApp.ActiveSheet.Range[‘test1’].row+1,EApp.ActiveSheet.Range[‘test1’].column]:=’test’;
end;

end.

“`