我把数据导出后,有人列头太长被挡住了,怎么样让列头自动长度?还有,如何让列在居中的基础上再两端对齐?举例说明:
我有一个列内容是“测试二”,结果这列的长度只能一行放“测试”,“二”字自动换行,且居中
样式如下:测 试
 二
谢谢大家!

解决方案 »

  1.   

    with ExcelWorkSheet1 do       begin
          Columns.AutoFit;
          Cells.Item[1,1] := Title;
          Range[Cells.Item[1,1],Cells.Item[1,k]].HorizontalAlignment:=xlCenter;
          Range[Cells.Item[1,1],Cells.Item[1,k]].VerticalAlignment:=xlCenter;
          Range[Cells.Item[1,1],Cells.Item[1,k]].Select;
          Range[Cells.Item[1,1],Cells.Item[1,k]].Merge(Cells.Item[1,k]);
          Cells.Item[1, k].Font.Size :='16';
        end;
    不知道是不是你想要的结果?