以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  表的行能合并吗  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=114282)

--  作者:nxqtxwz
--  发布时间:2018/2/2 12:11:00
--  表的行能合并吗

老师好,我看到论坛里有用FOXTABLE制作的软件,在表中可以将第一列的2、3、4行合并,第二列的3、4行合并,就如同EXCEL中的合并单元项一样,这样的表能实现吗?


--  作者:有点甜
--  发布时间:2018/2/2 12:23:00
--  

 可以,但是,只能是临时性的,如

 

Dim tb As Table = Tables("表A")
tb.Grid.AllowMerging = C1.Win.C1FlexGrid.AllowMergingEnum.Custom
Dim rng As C1.Win.C1FlexGrid.CellRange = tb.Grid.GetCellRange(2, 1, 2, 3)
tb.Grid.MergedRanges.add(rng)

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:自由合并.table


--  作者:nxqtxwz
--  发布时间:2018/2/2 13:00:00
--  

要是想将相同内容的同一列的不同行合并,代码怎么写呢?谢谢老师。


--  作者:有点甜
--  发布时间:2018/2/2 14:38:00
--  

比如合并第二列,3、4、5行,如代码

 

Dim tb As Table = Tables("表A")
tb.Grid.AllowMerging = C1.Win.C1FlexGrid.AllowMergingEnum.Custom
Dim rng As C1.Win.C1FlexGrid.CellRange = tb.Grid.GetCellRange(3, 2, 5, 2)  \'从坐标3,2合并到5,2
tb.Grid.MergedRanges.add(rng)


--  作者:nxqtxwz
--  发布时间:2018/2/2 17:49:00
--  

谢谢老师,很好用。如果我想把同一列的相同内空的行合并显示,能实现吗?


--  作者:有点甜
--  发布时间:2018/2/2 17:50:00
--  

不就是合并模式么?

 

http://www.foxtable.com/webhelp/scr/0157.htm

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=106332&skin=0

 


--  作者:nxqtxwz
--  发布时间:2018/2/2 18:44:00
--  

老师太厉害了,谢谢。