如何在Excel中插入一行

请问用TExcelApplication、TExcelWorkbook和TExcelWorkSheet如何去操作Excel，使其可以在指定位置插入一行。以下为网上给出的办法，可是根本无法运行：  
   
  ExcelApplication1.ActiveSheet.Rows[2].Insert;   //在第二行处插入一空行  
   
  本人使用的环境为Delphi7+Office   2003。

 
  可以这样处理：  
  如想在第I   +   1   行插入一空白行  
  if   row   :=   i   +1   then    
  for   j   :=   0   to   lcol   do  
  TempWorkSheet.Cells[row,   J]   :=   '';  
   
  这样不就插入一空白行了吗？

樓主太小氣。。。只有5分。  
  插入一行或一列：  
  a.   ExcelApp.ActiveSheet.Rows[2].Insert;  
  b.   ExcelApp.ActiveSheet.Columns[1].Insert;  
  删除一行或一列：  
  a.   ExcelApp.ActiveSheet.Rows[2].Delete;  
  b.   ExcelApp.ActiveSheet.Columns[1].Delete;  
 

按照ghtghtmalone的方法，第i+1行的内容将会被清空，而maming2003得方法是目前网上普遍流行的方法，只可惜，Delphi7下根本无法编译。我目前最头疼的是不知如何将某一行或列作为一个对象返回。还请各位赐教。

不知道你想干吗？  
  if   row   :=   i   +1   then    
  for   j   :=   0   to   lcol   do  
  TempWorkSheet.Cells[row,   J]   :=   '';  
  EXCEL不就是一个二维数组吗？  
   
  把想插入的数据放在数组中不就可以赋值了？  
   
  你想插入的值直接用下面的语句不就行了？  
  TempWorkSheet.Cells[row,   J]   :=   arr[rol,j];

--------------------------
盛大招聘.Net开发工程师

新闻：2008年开源软件10大胜利
导航：博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看