- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- excel无法合并，原因不明 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=111605)
-- 发布时间：2017/12/26 9:25:00
-- excel无法合并，原因不明
此主题相关图片如下：_ng(d5(yy`$st{qamb8_r.png
此主题相关图片如下：22jtc3ilxibcgu``igo`277.png
设计了个窗口，进行外部excel合并，之前一直再用都正常，这次操作和代码也觉得没有问题，但是一直报错，请专家帮忙查看一下啊，感谢！
代码如下：
Dim mg As New Merger
mg.SourcePath = "C:\\Users\\Administrator\\Desktop\\机构对应表.xlsx"
mg.Format = "excel" \'指定格式
mg.SourceTableName = "机构对应表$" \'指定要合并的表
mg.DataTableName = "机构对应表" \'指定接收数据的表
mg.Merge() \'开始合并
报错无法找到“机构对应表$"，试过把$去掉，还是不行，电脑是win10系统
此主题相关图片如下：~mvod%806qhii379`o%g}v.png
此主题相关图片如下：~mvod%806qhii379`o%g}v.png-- 发布时间：2017/12/26 9:41:00
--
看看是否改成这样。红色是里面的表的名字，不是文件名
Dim mg As New Merger
mg.SourcePath = "C:\\Users\\Administrator\\Desktop\\机构对应表.xlsx"
mg.Format = "excel" \'指定格式
mg.SourceTableName = "sheet1$" \'指定要合并的表
mg.DataTableName = "机构对应表" \'指定接收数据的表
mg.Merge() \'开始合并
-- 发布时间：2017/12/26 10:04:00
--
不行的，我里面的表名字是该过的，都是“机构对应表”，为了防止我记错，所以形成统一。。。。
-- 发布时间：2017/12/26 10:11:00
--
你的excel文件上传上来测试。
-- 发布时间：2017/12/26 10:14:00
--
好的，我想着这个会不会跟我系统有关系
之前能用的窗口，我现在测试都是一样的问题
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:机构对应表.xlsx |
-- 发布时间：2017/12/26 10:29:00
--
测试了一下，代码和excel文件均没有问题。
看看你设置的路径是否错误？改成选择表的情况
Dim dlg As new OpenFileDialog
If dlg.ShowDialog = DialogResult.OK Then
Dim mg As New Merger
mg.SourcePath = dlg.FileName
mg.Format = "excel" \'指定格式
mg.SourceTableName = "机构对应表$" \'指定要合并的表
mg.DataTableName = "机构对应表" \'指定接收数据的表
mg.Merge() \'开始合并
End If
-- 发布时间：2017/12/26 10:40:00
--
选择文件，问题解决了，应该知道问题出在哪了，非常感谢！