求助，需要从Excel表中按照B列数据查询匹配数据库中的数据

dyh酋长 · 发表于 2018-9-15 15:18

本帖最后由 dyh酋长于 2018-9-15 21:57 编辑

不好意思，重新发了以下，大家看一下，需要从Excel表中按照B列数据查询匹配数据库中的数据，这个超过6万行就不行了，有什么解决方法

lsc900707 · 发表于 2018-9-15 15:45

里面这么多代码到底修改哪一个呢？

dyh酋长 · 发表于 2018-9-15 17:37

您好，我重新上传了以下附件，您在看看，主要就是为什么一超过6万行就不行了

dyh酋长 · 发表于 2018-9-15 18:50

lsc900707 发表于 2018-9-15 15:45
里面这么多代码到底修改哪一个呢？

重新上传了，您看一下

lsc900707 · 发表于 2018-9-15 19:09

dyh酋长发表于 2018-9-15 18:50
重新上传了，您看一下

[查询$B2:G" & range("b65536").End(xlUp).Row改成：
[查询$B2:G" & Cells(Rows.Count, 2).End(xlUp).Row

dyh酋长 · 发表于 2018-9-15 20:05

lsc900707 发表于 2018-9-15 19:09
[查询$B2:G" & range("b65536").End(xlUp).Row改成：
[查询$B2:G" & Cells(Rows.Count, 2).End(xlUp).Ro ...

您好，更换之后，提示数据库引擎找不到对象“查询$B2:G155246”.请确保对象存在，并正确拼写其名称与路径名

dyh酋长 · 发表于 2018-9-15 20:09

lsc900707 发表于 2018-9-15 19:09
[查询$B2:G" & range("b65536").End(xlUp).Row改成：
[查询$B2:G" & Cells(Rows.Count, 2).End(xlUp).Ro ...

还是同样的问题，我试了一下[查询$B2:G" & Cells(Rows.Count, 2).End(xlUp).Row，只要数据不超过65536就可以正常运行，一超过就报错了

lsc900707 · 发表于 2018-9-15 20:23

本帖最后由 lsc900707 于 2018-9-15 20:24 编辑

dyh酋长发表于 2018-9-15 20:09
还是同样的问题，我试了一下[查询$B2:G" & Cells(Rows.Count, 2).End(xlUp).Row，只要数据不超过65536就 ...

你用的是office哪个版本？把Excel8.0 改成excel12.0试试。

dyh酋长 · 发表于 2018-9-15 20:36

lsc900707 发表于 2018-9-15 20:23
你用的是office哪个版本？把Excel8.0 改成excel12.0试试。

office10版本的，这个有什么办法解决吗，现在就卡在这6万条以上数据这一块

lsc900707 · 发表于 2018-9-15 20:48

dyh酋长发表于 2018-9-15 20:36
office10版本的，这个有什么办法解决吗，现在就卡在这6万条以上数据这一块

8楼有回复，代码中有一个excel8.0的，换成excel12.0

		自动登录	找回密码
密码			免费注册

[求助] 求助，需要从Excel表中按照B列数据查询匹配数据库中的数据