以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  引用局域网内的路径  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=157199)

--  作者:mxl810823
--  发布时间:2020/10/7 18:31:00
--  引用局域网内的路径
Dim Book As New XLS.Book("\\\\192.168.0.230\\Foxtable管理软件共享\\公司资料\\LCD定型资料\\一线定型资料.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(0)

以上程序出错提示”已添加具有相同键的项“,为什么?这个是局域网内的路径,不能用吗?? 如要用,怎么解决?

--  作者:mxl810823
--  发布时间:2020/10/8 8:13:00
--  
现在看来与程序无关,与文件有关。如附件里这个文件,如果另存为xlsx格式是可以引用得了的,或是把文件里面前面200行删除了也是可以引用的,我就是想不通为什么,也没看出来前面200行有什么不一样,究竟是哪一行有问题也不知道
--  作者:mxl810823
--  发布时间:2020/10/8 8:14:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:222.xls


--  作者:有点蓝
--  发布时间:2020/10/8 9:02:00
--  
直接菜单导入没有问题。贴出导入的完整代码说明
--  作者:mxl810823
--  发布时间:2020/10/8 9:31:00
--  
If FileSys.FileExists("f:\\222.xls") Then
    Messagebox.Show("文件已经存在!","提示")
Else
    Messagebox.Show("文件不存在或已经被删除!","提示")
End If
Dim Book As New XLS.Book("f:\\222.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(0)

就是这个代码放在命令窗口运行就出错呀。(把222这个文件放在F盘)

--  作者:有点蓝
--  发布时间:2020/10/8 10:10:00
--  
把execl文件D列到I列整列删除掉。应该是空列名导致程序认为列名重复了
--  作者:mxl810823
--  发布时间:2020/10/8 10:38:00
--  
删除列不行哦,删除行是可以的,现在删除前面的行只留下400行是可以运行的。所以问题出在哪里?看不出这些行有什么不同。
--  作者:有点蓝
--  发布时间:2020/10/8 10:55:00
--  
5楼的代码我测试删除列没有问题。如果还有其它代码请发上来
--  作者:mxl810823
--  发布时间:2020/10/8 11:06:00
--  
你该不会是把带有数据的列删除了吧,现在找到问题了,如下图

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20201008105801.png
图片点击可在新窗口打开查看
把文件中的长杠号用短杠号代替就可以了。
现在问题又来了,我用程序都不能打开这个文件,怎么用程序替换得了这个东西?我最开始的本意是在程序中自动引用这个文件,读取文件里的内容,现在我要怎么实现?。


--  作者:有点蓝
--  发布时间:2020/10/8 11:19:00
--  
长杠号不可能有问题,如果还有其它代码请发上来测试