求助数据合并填充的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 求助数据合并填充的问题

共有1894人关注过本帖树形打印复制链接主题：求助数据合并填充的问题

ye8573

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：117 积分：940 威望：0 精华：0 注册：2017/1/12 16:26:00

求助数据合并填充的问题 发帖心情

Post By：2018/2/9 15:31:00 [显示全部帖子]

此主题相关图片如下：1518160900(1).png

如图中的同一编号的4行数据，第7列是4个不同维修人员的名字，我在另一张表中自动获取了那个编号并生成一行数据，请问能否自动获取那四个名字并填充在维修人员列的同一单元格中？我只能自动获取1个名字填充，但是那样的话还是会生成四行数据，需要的效果是一个编号一行数据。请大神帮助下，谢谢啦

ye8573

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：117 积分：940 威望：0 精华：0 注册：2017/1/12 16:26:00

Post By：2018/2/9 15:42:00 [显示全部帖子]

代码如下，请大神斧正...

Dim f As New Filler

f.SourceTable = DataTables("零星维修表") '指定数据来源

f.SourceCols = "自动编号,门店名称,状态,品牌,跟单,接单日期,费用承担,维修内容,维修类型" '指定数据来源列

f.DataTable = DataTables("零星结算表") '指定数据接收表

f.DataCols = "自动编号,门店名称,状态,品牌,跟单,接单日期,费用承担,维修内容,维修类型" '指定数据接收列

f.ExcludeExistValue = True

f.Distinct = True

f.Filter = "状态<>'1.已接单'"

f.Fill()

主题：求助数据合并填充的问题