程式怎么合并excle的存儲格呀???急,在線等!!!解決就給分

解决方案 »

  1.   

    合并单元格
        ExcelApp.ActiveSheet.Range['C1:K1'].Select;
        ExcelApp.Selection.HorizontalAlignment := xlCenter;
        ExcelApp.Selection.VerticalAlignment := xlBottom;
        ExcelApp.Selection.MergeCells := False;
        ExcelApp.Selection.Merge;
    格式设置
    选择Excel作为报表服务器主要是因为它强大的格式化能力。我们首先把标题"通讯录"进行单元格合并,居中显示,然后修改字体为18磅的"隶书",粗体:
    with wkSheet.Range['A1','D1'],Font do
    begin
    Merge(True); //合并单元格
    HorizontalAlignment:= xlCenter;
    Size:=18;
    Name:='隶书';
    FontStyle:=Bold;
    end;
    如果单元格内容较长,将有部分内容无法显示,通常的做法是双击选定区域右侧的边线是各列的宽度自动适应内容的长度。在Delphi中通过AutoFit方法也可实现自适应的列宽行高,需要注意的是该方法仅能用于整行整列,否则会提示OLE方法拒绝执行的错误:
    wkSheet.Columns.EntireColumn.AutoFit;