急求:Delphi7.0如果删除Excel文档中的第一行?
在线等待!!!!!

解决方案 »

  1.   

    uses ComObj;var Excel: OleVariant;
    begin
      Excel := CreateOLEObject('Excel.Application');
      Excel.WorkBooks.Open('c:\1.xls');//打开
      Excel.WorkSheets[1].Rows[1].Delete; //删除第一行
      Excel.ActiveWorkbook.Save;  // 保存
      Excel.Quit;//退出
    end;
      

  2.   

    谢谢 liangqingzhi(老之)
    再加20分,请问如果把第二行的数据复制到第一行,也就是传给第一行???
    谢谢
      

  3.   

    把第二行的数据复制到第一行,也就是传给第一行???是不是只想实现复制,而不是删除后在复制,两码是啊?
    要光复制的话,我觉得得把文件循环读出来,然后Excel.WorkSheets[1].Rows[1]=Excel.WorkSheets[1].Rows[2],然后保存。
    我只是这样想的,没有试!
      

  4.   

    谢谢summersky204608() 
    Excel.WorkSheets[1].Rows[1]=Excel.WorkSheets[1].Rows[2]
    这句不能用,运行后出现“找不到成员”的错误??
    我现在只是想能够把第二行的数据复制到第一行就行
      

  5.   

    试试这样:
    Excel.WorkSheets[1].Rows[2].Copy;
    Excel.WorkSheets[1].Rows[1].PasteSpecial;
      

  6.   

    谢谢:liangqingzhi(老之) ( ) 
    问题已经解决