要实现Excel中的栏目象以下的格式 怎样编写代码?
______________________________________________
| A |_________B______________| F |
|_______|___C__|____D____|____E__|___________|这样的带有负栏的表头该怎样写?
以下对不对?
Range['A1','B1'].Merge(true);
Range['A1','B4'].Merge(true);
range['A5','B5'].Merge(true);
excelworksheet1.Cells.Item[1,1]:=A;
excelworksheet1.Cells.Item[1,2]:=B;
excelworksheet1.Cells.Item[1,3]:=F;
excelworksheet1.Cells.Item[2,2]:=C;
excelworksheet1.Cells.Item[2,3]:=D;
excelworksheet1.Cells.Item[2,4]:=E;
可这样并不能达到预期的效果,希望大家给予帮助。我在这里先谢谢各位啦?
______________________________________________
| A |_________B______________| F |
|_______|___C__|____D____|____E__|___________|这样的带有负栏的表头该怎样写?
以下对不对?
Range['A1','B1'].Merge(true);
Range['A1','B4'].Merge(true);
range['A5','B5'].Merge(true);
excelworksheet1.Cells.Item[1,1]:=A;
excelworksheet1.Cells.Item[1,2]:=B;
excelworksheet1.Cells.Item[1,3]:=F;
excelworksheet1.Cells.Item[2,2]:=C;
excelworksheet1.Cells.Item[2,3]:=D;
excelworksheet1.Cells.Item[2,4]:=E;
可这样并不能达到预期的效果,希望大家给予帮助。我在这里先谢谢各位啦?
ExcelApp.ActiveSheet.range['A5:B5'].Merge;
给个BCB的代码段:
String strRange = "A" + IntToStr(1) + ":" + "C" + IntToStr(5); //比如:A1:C5
vRange=vSheet.PG("Range", strRange.c_str()); //可以用变量控制单元格合并
vRange.FN("Merge", false);
EBorders = vRange.OlePropertyGet("Borders");//获取边框对象
EBorders.OlePropertySet("linestyle",xlOutline);
几个要点:
1.#include "Excel_2K_SRVR.h"
#pragma link "Excel_2K_SRVR"2.一定要获取边框对象,然后设置一下边框,这样就可以达到效果了
| A |_________B______________| F |
|_______|___C__|____D____|____E__|___________|给个例子:
ExcelApp.ActiveSheet.range['A5:B5'].Merge;
这句话怎么在运行时有错误?还有怎么实现在B栏下面还有C,D,E三个副标题栏,最好能给出Delphi 实例代码。再次希望大家能指点迷津。我正苦恼不知如何实现呢?
range:variant;range:=asheet.range[asheet.cells[1,1],asheet.cells[1,10]];//选中单元格
range.merge;//合并居中