Foxtable(狐表)用户栏目专家坐堂 → 窗口数据合并错误问题


  共有1661人关注过本帖树形打印复制链接

主题:窗口数据合并错误问题

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/30 17:10:00 [显示全部帖子]

Dim dlg As New 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.Format = "excel"
        mg.SourcePath = fl
        mg.SourceTableName = "Sheet1$"
        mg.DataTableName = "安全员计划表"
        mg.Merge()
    Next
End If

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/30 18:22:00 [显示全部帖子]

1、报什么没错?

 

2、请把你excel文件发上来测试。

[此贴子已经被作者于2018/8/30 18:22:33编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/30 22:13:00 [显示全部帖子]

以下是引用轩辕绝在2018/8/30 21:59:00的发言:
直接用软件里的快速合并按钮就没问题,用窗口的就报错。
xlsx文件在办公司,明天发。

 

1、这个加了没有? mg.Format = "excel"

 

2、如果1没问题,那就是你这句代码写错了,你xls文件里面的表的名字叫什么?肯定不是sheet1。

 

mg.SourceTableName = "Sheet1$"


 回到顶部