Foxtable(狐表)用户栏目专家坐堂 → 从Excel2007中提取数据


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

主题:从Excel2007中提取数据

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


加好友 发短信
等级:二尾狐 帖子:517 积分:4199 威望:0 精华:0 注册:2009/10/8 16:43:00
从Excel2007中提取数据  发帖心情 Post By:2013/2/22 9:55:00 [只看该作者]

按帮助中下述例子,从2007中提取数据显示的是空白,2003正常:

For Each file As String In filesys .GetFiles("c:\Data")
    If
file.EndsWith(".xls") OrElse file.EndsWith(".xlsx") Then
        Dim
Book As New XLS.Book(file)
        Dim
Sheet As XLS.Sheet = Book.Sheets(0)
        Dim
dr As DataRow = DataTables("员工").AddNew
       
dr("姓名") = sheet(4,1).Text
    End If
Next


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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/22 10:19:00 [只看该作者]

 代码没有错的,上传你的excel表格测试一下。

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


加好友 发短信
等级:二尾狐 帖子:517 积分:4199 威望:0 精华:0 注册:2009/10/8 16:43:00
  发帖心情 Post By:2013/2/22 10:22:00 [只看该作者]

即帮助文件中提供的的示例表格。这台电脑上装的是EXCEL2003,提供不了2007格式的。

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/22 10:28:00 [只看该作者]


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


加好友 发短信
等级:二尾狐 帖子:517 积分:4199 威望:0 精华:0 注册:2009/10/8 16:43:00
  发帖心情 Post By:2013/2/22 10:29:00 [只看该作者]

谢谢!试试看。

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


加好友 发短信
等级:二尾狐 帖子:517 积分:4199 威望:0 精华:0 注册:2009/10/8 16:43:00
回复:(lin_hailun) 你试试在你的电脑上安装一...  发帖心情 Post By:2013/2/28 11:07:00 [只看该作者]

安装了,不管用。用2003版就没问题。看来还得加强对2007的支持。

 回到顶部