以文本方式查看主题

-  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=148219)

--  作者:夏许多雪
--  发布时间:2020/4/2 15:49:00
--  读取现有excel表中的数据
在现有的excel表中,要读取某个单元格的数据,用以下命令出现错误指示,什么原因,如何修改以下代码
Dim dir As String = "D:\\任务表"
Dim filnames As List(of String)
For Each File As String In FileSys.Getfiles(dir)
 If file.Contains(".xls") Then
Dim Book As New XLS.Book(file) 
Dim Sheet As XLS.Sheet 
Book.Build() 
Sheet = Book.Sheets("任务表")
Dim t As String = Sheet(5, 0).Text  
Output.Show(t)
End If
Next


--  作者:有点蓝
--  发布时间:2020/4/2 17:00:00
--  
提示什么错误?
--  作者:夏许多雪
--  发布时间:2020/4/2 17:09:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:错误_看图王.gif
图片点击可在新窗口打开查看
错误显示
[此贴子已经被作者于2020/4/2 17:11:46编辑过]

--  作者:有点蓝
--  发布时间:2020/4/2 17:32:00
--  
1、这个文件处于打开状态,无法再使用代码打开。关闭所有打开的execl
2、可能杀毒软件正在检查,导致冲突,关闭杀毒软件试试

--  作者:夏许多雪
--  发布时间:2020/4/3 9:14:00
--  
好的,可以了。