- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]字段合并 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=168956)
-- 发布时间：2021/5/28 11:08:00
-- [求助]字段合并
老师好！表A同一行，第一列单元格、第二列单元格、第三列单元格合并到第四列同一行单元格的代码应该如何写？合并后内容插入 / 分开
[此贴子已经被作者于2021/5/28 11:11:43编辑过]
-- 发布时间：2021/5/28 11:28:00
--
参考：http://www.foxtable.com/webhelp/topics/1452.htm
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "第一列","第二列"
dr("第四列") = dr("第一列") & "/" & dr("第二列")
End Select
Select Case e.DataCol.Name
Case "第一列","第二列"
dr("第四列") = dr("第一列") & "/" & dr("第二列")
End Select
-- 发布时间：2025/3/27 15:52:00
--
请问：若“车皮号”列合并了2行或3行或4行，，“件数”列也必须是合并2行或3行或4行，这个代码是怎样的？可否通过下代码修改？该如何修改？
With Tables("送货单窗口_Table1")
.MergeMode = MergeModeEnum.Free
.MergeCols.Clear()
.MergeCols.Add("货物名称")
.MergeCols.Add("批号")
.MergeCols.Add("车皮号")
.MergeCols.Add("件数")
.MergeSort = "货物名称,批号,车皮号,件数"
.AllowMerge = True
End With
-- 发布时间：2025/3/27 16:05:00
--
“件数”列的值必须是一样的才能合并
-- 发布时间：2025/3/27 16:25:00
--
件数列是一样的，车皮号对应件数的，这里根据车皮号合并，原单计数列必须合并2行
此主题相关图片如下：b7dfd7aacf488c74d64332a61627eb0.png
[此贴子已经被作者于2025/3/27 16:35:07编辑过]
-- 发布时间：2025/3/27 16:42:00
--
把车皮号列移到原单计数列前面
然后
.MergeMode = MergeModeEnum.Free
改为
.MergeMode = MergeModeEnum.Standard