主题：[求助]请问如何导入合并excel文档

有4个Excel文档

1档有 ABC

2档有 ADEF

3档有 AGHIJ

4档有 AKLMN...

4个文档都有A这个KEY

怎么导入一个FT的表中？这个表含有 ABCDEFGHIJKLMN....

要把A相同的资料填入A之后，而不是起一新的行号。

实例已上传，表1 表2 表3 表4 为例子，希望合并为达到 表5 的效果，谢谢

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:导入合并.rar

 用代码合并即可，参考，具体请上传例子。

http://www.foxtable.com/help/topics/2334.htm

mark

Dim dlg As new OpenFileDialog
dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.OK Then
    For Each f As String In dlg.FileNames
        Dim  Book As New XLS.Book(f)
        Dim Sheet As XLS.Sheet = Book.Sheets(0)
        Dim dic As new Dictionary(Of String, Integer)
        For i As Integer = 0 To sheet.Cols.Count - 1
            If sheet(0,i).Text <> Nothing
                dic.Add(sheet(0,i).Text,i)
            End If
        Next
        For  n As Integer = 1 To Sheet.Rows.Count -1
            Dim bh As String = sheet(n,dic("单号")).Text
            Dim dr As DataRow = DataTables("物流管理").Find("单号 = '" & bh & "'")
            If dr Is Nothing Then  '如果不存在同编号的订单
                dr =  DataTables("物流管理").AddNew()
            End If
            For Each c As String In dic.Keys
                dr(c) = sheet(n, dic(c)).Text
            Next
        Next
    Next
End If