aSheet.Range['A1','B2'].MergeCells:=True;以上可以合并。但是我不知道到底是B还是F,也就是说是动态的,但是我可以得到Column的值,也就是['A1','Column2'],应该怎么写才正确?还有就是怎么禁用鼠标,就是让屏幕上的鼠标变成一个漏斗型,等完成某项操作后又恢复?谢谢各位大侠帮忙!
解决方案 »
- 谁给我一个Delphi施用的序列号?
- 急求delphi中修改本机IP的例子(包括网关和子网掩码等信息,解决给分
- 如何禁用和起用IE浏览器(或禁止电脑上网)??
- 调用这个函数,但总是出 定位RegisterServiceProcess 出错??
- 有没有开发游戏外挂的
- 如何在一个程序点击另一个程序的按钮?
- 求救!!!!关于MIDAS的问题
- 拜托各位高手给小弟指点迷津,不甚感激!!
- 有关Delphi中数据库登陆和打印程序的问题
- 更正,no visual c,delphi it is,和速达2000几乎完全一样的表单录入控件!!
- 怎么动态生成一个控件呀,比如说我要运行的时候单击
- 关于.bmp图片的透明处理问题
qzw:=excelworksheet2.rows;
QZW1:=excelworksheet2.Range['A1','e1'];
QZW1.MERGE;(unmerge)合并和拆散单元格
有的时候是E,有的时候可能是AF!
我只能知道是第5列,或者是第七列,就是说怎么转化为E,或G?
CASE 列数 OF
5:QZW1:=excelworksheet2.Range['A1','e1'];
7:QZW1:=excelworksheet2.Range['A1','G1'];
END;
ExlRangeStr:=GetCellNumber(column-1)+'1'; //GetCellNumber把列转化为A或者G的函数
ExcelWorkSheet1.Range['A1',ExlRangeStr].Font.Name:='隶书'; //字体
ExcelWorkSheet1.Range['A1',ExlRangeStr].Font.Size:='23'; //字体大小
ExcelWorkSheet1.Range['A1',ExlRangeStr].MergeCells:=True; //合并单元格
ExcelWorkSheet1.Range['A1',ExlRangeStr].HorizontalAlignment:=xlCenter;//字体居中