菜鸟请教vlookup数组查询22行记录

debbie11052000

大虾们请教，
我想从右表里查询数据，填入左表的第四列，
右表目前数据22万行+，还在不断扩充中，
使用数组和vlookup提示报错13，
当我把右表删到100行，运行正常
请问是不是数组有限制？

谢谢前辈啦

代码如下：

1. Sub text()
   
2. 
   
3. Dim arr, brr
   
4. Dim a&
   
5. 
   
6. arr = Sheet6.UsedRange
   
7. brr = Sheet7.UsedRange
   
8. 
   
9. For a = 2 To UBound(arr)
   
10. 
    
11. arr(a, 4) = WorksheetFunction.VLookup(arr(a, 1), brr, 2, 0)
    
12. 
    
13. Next
    
14. Sheet6.[a1].Resize(UBound(arr, 1), UBound(arr, 2)) = arr
    
15. End Sub

复制代码

debbie11052000

求助大侠，求助大侠们

debbie11052000

怎么没人帮我下呢，5555

BenjaminToo

按你发的这个file，我能够成功运行，没有提示错误

debbie11052000

BenjaminToo 发表于 2018-7-6 08:54
按你发的这个file，我能够成功运行，没有提示错误

为什么我的就不可以呢，我把行数减到5K，运行正常，减到10K，运行就报错了，“类型不匹配13”

debbie11052000

VBA报错如图

fenglingdongwdn

记得数组好像是有上限的，说错了别见怪啊，数组能存放的元素最大上限好像是65536，这个表建议你用sql进行查询这样的话应该可以解决