如何在word中选择表格并合并? 我用代码在word中生成了一个表格,现在想把其中的几个格合并,如何用程序选择其中的几个格?(比如选择第一行的1,2与第二行的1,2这四个格,或选择第一行的2,3,4这三个格) 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var a1,a2,a3: OleVariant; table : Table;begin table.Cell(1,1).Select; //选中单元格(1,1) a1 := wdCharacter; a2 := 1; a3 := wdExtend; application.Selection.MoveRight(a1, a2, a3); //选中单元格(1,2) a1 := wdLine ; a2 := 2; a3 := wdExtend; application.Selection.MoveDown(a1, a2, a3); //选中单元格(1,1)(1,2)(2,1)(2,2) application.Selection.Cells.Merge;//合并 delphi的控件限定取值修改的问题? 好复杂的指针 用delphi做了一个简易浏览器,但是有点问题 请教关于PRINTER的打印问题,谢谢 奇怪!!!fastreport2.5(Delphi6)的程序在运行预览报表时提示Stack OverFlow,然后就自动关闭 OnGetDisplayText在何组件中使用? 怎样在dxGrid中加上一个显示数据纪录行数的列?? 一个倒霉的报表 递归 数据库问题,请帮个忙 请教ADO 如何确定程序所在目录
a1,a2,a3: OleVariant;
table : Table;
begin
table.Cell(1,1).Select; //选中单元格(1,1)
a1 := wdCharacter;
a2 := 1;
a3 := wdExtend;
application.Selection.MoveRight(a1, a2, a3); //选中单元格(1,2)
a1 := wdLine ;
a2 := 2;
a3 := wdExtend;
application.Selection.MoveDown(a1, a2, a3); //选中单元格(1,1)(1,2)(2,1)(2,2) application.Selection.Cells.Merge;//合并