以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎么实现数据合并前的判断呢?如果有相同数据就跳过不合并,反之就合并!  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=176167)

--  作者:cnsjroom
--  发布时间:2022/4/2 11:36:00
--  怎么实现数据合并前的判断呢?如果有相同数据就跳过不合并,反之就合并!

怎么实现数据合并前的判断呢?如果有相同数据就跳过不合并,反之就合并!

单位归属表有 单位名称 联系人  部门名称  电话  职务   怎么实现在合并前先判断这些字段是否有相同值  如果有就跳过  反之就合并

对应的excel文件也是一样的列内容

 

当前代码如下:

Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog
dlg.Filter= "excel文件|*.xls;*.xlsx" \'设置筛选器
dlg.MultiSelect = True \'允许选择多个文件
If dlg.ShowDialog =DialogResult.OK Then
    For Each fl As String In dlg.FileNames
        Dim mg As New Merger
        mg.SourcePath = fl
        mg.Format = "excel" \'指定格式
        mg.SourceTableName = "单位归属$" \'指定要合并的表
        mg.DataTableName = "单位归属" \'指定接收数据的表
        mg.Merge() \'开始合并
    Next
End If


--  作者:有点蓝
--  发布时间:2022/4/2 11:42:00
--  
只能这种方式:http://www.foxtable.com/webhelp/topics/2334.htm,合并的时候使用find查询判断