NativeExcel使用

var
    Book: IXLSWorkbook;
    ws: IXLSWorksheet;
begin
  Book := TXLSWorkbook.Create;                    //建立NativeExcel
  ws := Book.Sheets.Add;                          //增加一个Sheet页
  ws.Name := 'Sheet1';                            //Sheet页的名称，也就是显示在Tab上的名字
  ws.DisplayGridLines :=False;                    //本Sheet页是否显示表格线
  With ws.Range['B3', 'F3'] do begin              //NativeExcel中需要对一个范围进行操作
    Merge(False);                                 //参数设置为False时是合并单元格，设置成True就不合并了
    Interior.Color :=RGB(184, 204, 228);          //设置表格背景色
    Borders[xlAround].Weight := xlThin;           //设置外围线框
    Borders[xlInsideAll].Weight := xlThin;        //设置内部线
    Font.Name := '微软雅黑';
    Font.Size := 10;
    Font.Bold :=True;
    Value :='Demo';                               //放在Range里的赋值，相当于统一赋值
    HorizontalAlignment := xlHAlignCenter;        //单元格的水平对齐
    VerticalAlignment := xlVAlignCenter;          //单元格的竖直对齐
    NumberFormat :='#,##0.00';                    //设置显示内容的格式
  end;
  ws.Cells.Columns[1].ColumnWidth :=20;           //设置列宽，这个数值基本上和Excel里是一样的
  ws.Cells.Item[3, 2].Value :='名称';             //给单元格赋值，读取单元格也用Value，但是需要对读取的内容进行处理判断。坐标是先行后列，而且第一个位置是从1开始，而不是0。
  ws.UsedRange.Columns.AutoFit;                   //设置单元格宽度为自适应，表格生成完成后使用
  Book.SaveAs('test.xlsx', xlOpenXMLWorkbook);    //xlOpenXMLWorkbook参数为保存xlsx格式

　　NativeExcel适合比较轻量的应用，写Excel的速度很快。但是如果更复杂的操作，或者需要从Excel里读取数据的话，建议还是使用XLSReadWriteII。