在  .......sheet.rows[i].delete;

解决方案 »

  1.   

    终于调试成功,在delphi6+excel2000
    你可看vba的帮助。下面用于删除第一行.procedure TForm1.Button1Click(Sender: TObject);
    var W:_WorkSheet;
    begin
            ExcelWorkBook1.ConnectTo(ExcelApplication1.ActiveWorkbook);
            W:=ExcelWorkBook1.ActiveSheet As _WorkSheet;
            ExcelWorkSheet1.ConnectTo(W);
            ExcelWorkSheet1.Range['A1','D1'].Delete(xlShiftUp)        //.Range(Cells(1, 1), Cells(5, 3)).
            //ExcelWorkSheet1.ConnectTo(ExcelApplication1.);
            //ExcelWorkSheet1.
            //ExcelApplication1.Worksheets.
    end;
    ActiveSheet.
      

  2.   

    execlworkbook1.activesheet.rows[i].delete(EmptyParam);
      

  3.   

    回复人: kmask(I_want_to_sleep) (2001-8-6 0:09:43)  得0分 
    在  .......sheet.rows[i].delete;  
    改成
      (.......sheet As _WorkSheet).rows[i].delete;  
                    ~~~~~~~~~~~~~~~
    就可以了。