Delphi控制Excel2000

领测软件测试网

    ExcelApp.ActiveSheet.Range.PasteSpecial;
    16) 插入一行或一列：
    a. ExcelApp.ActiveSheet.Rows[2].Insert;
    b. ExcelApp.ActiveSheet.Columns[1].Insert;
    17) 删除一行或一列：
    a. ExcelApp.ActiveSheet.Rows[2].Delete;
    b. ExcelApp.ActiveSheet.Columns[1].Delete;
    18) 打印预览工作表：
    ExcelApp.ActiveSheet.PrintPreview;
    19) 打印输出工作表：
    ExcelApp.ActiveSheet.PrintOut;
    20) 工作表保存：
    if not ExcelApp.ActiveWorkBook.Saved then
    ExcelApp.ActiveSheet.PrintPreview;
    21) 工作表另存为：
    ExcelApp.SaveAs( ’C:\Excel\Demo1.xls’ );
    22) 放弃存盘：
    ExcelApp.ActiveWorkBook.Saved := True;
    23) 关闭工作簿：
    ExcelApp.WorkBooks.Close;
    24) 退出 Excel：
    ExcelApp.Quit;
    (二) 使用Delphi 控件方法
    在Form中分别放入ExcelApplication, ExcelWorkbook和ExcelWorksheet。 
    1） 打开Excel 
    ExcelApplication1.Connect;
    2) 显示当前窗口：
    ExcelApplication1.Visible[0]:=True;
    3) 更改 Excel 标题栏：
    ExcelApplication1.Caption := ’应用程序调用 Microsoft Excel’;

文章来源于领测软件测试网 https://www.ltesting.net/