Foxtable(狐表)用户栏目专家坐堂 → excel合并问题


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

主题:excel合并问题

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


加好友 发短信
等级:婴狐 帖子:9 积分:131 威望:0 精华:0 注册:2017/12/26 9:08:00
excel合并问题  发帖心情 Post By:2019/9/12 17:45:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建 microsoft office excel 工作表.xlsx

合并excel出现问题
“人员信息查询1$”不是一个有效名称。请确认它不包含无效的字符或标点,且名称不太长。
“人员信息查询1$”不是一个有效名称。请确认它不包含无效的字符或标点,且名称不太长。
虽然有错误提示,但是表格内容合并进去了
For Each fl As String In FileSys.GetFiles("C:\Users\duanminghui\Desktop\临时数据表")
    Dim mg As New Merger
    mg.SourcePath = fl
    mg.Format = "Excel"
    mg.SourceTableName = "人员信息查询1$" '指定要合并
图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20190902113549.png
图片点击可在新窗口打开查看
的表
    mg.DataTableName = "人员信息查询1" '指定接收数据的表
    mg.Merge() '开始合并
Next
代码

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


加好友 发短信
等级:超级版主 帖子:107135 积分:544918 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/15 9:11:00 [只看该作者]

Dim mg As New Merger
mg.SourcePath = "D:\问题\123.xlsx"
mg.Format = "Excel2007"
mg.SourceTableName = "人员信息查询1$" '指定要合并
mg.DataTableName = "人员信息查询1" '指定接收数据的表
mg.Merge() '开始合并


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


加好友 发短信
等级:婴狐 帖子:9 积分:131 威望:0 精华:0 注册:2017/12/26 9:08:00
  发帖心情 Post By:2019/9/15 10:06:00 [只看该作者]

老师,我改完之后还有错误提示,一个是:找不到可安装的 ISAM。还有一个是:“银保承保清单$”不是一个有效名称。请确认它不包含无效的字符或标点,且名称不太长。

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


加好友 发短信
等级:超级版主 帖子:107135 积分:544918 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/15 10:12:00 [只看该作者]

下载安装下面的数据访问组件:

http://www.foxtable.com/download/AccessDatabaseEngine.exe


另外有些sheet名称可能不需要$,“银保承保清单$”和“银保承保清单”都试试

 回到顶部