怎么合并Excel的单元格 aSheet.Range['A1','B2'].MergeCells:=True;以上可以合并。但是我不知道到底是B还是F,也就是说是动态的,但是我可以得到Column的值,也就是['A1','Column2'],应该怎么写才正确?还有就是怎么禁用鼠标,就是让屏幕上的鼠标变成一个漏斗型,等完成某项操作后又恢复?谢谢各位大侠帮忙! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 qzw: Variantqzw:=excelworksheet2.rows;QZW1:=excelworksheet2.Range['A1','e1'];QZW1.MERGE;(unmerge)合并和拆散单元格 这个‘E’是动态的!也就是我不能确定到底是E还是F.有的时候是E,有的时候可能是AF!我只能知道是第5列,或者是第七列,就是说怎么转化为E,或G? 只有做判断:CASE 列数 OF5:QZW1:=excelworksheet2.Range['A1','e1'];7:QZW1:=excelworksheet2.Range['A1','G1'];END; 谢谢WWWWA(aaaa) 兄弟,我已经按你的方法解决,虽然不是有36列,但是毕竟是解决了!下面再给出所有的一些操作: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;//字体居中 希望得到一个很大的SQL文件,应该用什么类型从DLL向宿主程序返回参数? 请教抓屏打印两问题 pascal精要的一个语句的问题 ADOTable连接DSN 关于dbgrid 的很菜的问题及IP地址获得的问题 如何将字符转成ASCII码 用delphi的SQL Explorer怎么连接Sybase数据库,需要设置哪几个参数? 请问大家有关COM的问题 用TTable访问Access数据库时,怎么才能不弹出数据库的验证密码窗口? 怎样去掉数据库程序启动时缺省的数据库登录对话框? 怎么动态生成一个控件呀,比如说我要运行的时候单击 关于.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;//字体居中