如何在一列中查找一个值，然后返回此表中另一列对应的数值

烟花00524

各位大侠好，我想根据表1中的箱号，在表1对比中的箱号查重，如果相同，就返回表1对比中的发送时间，谢谢各位大侠了。

micch

？？？vlookup查找吗？？？箱号是唯一的？

烟花00524

micch 发表于 2019-3-21 19:21
？？？vlookup查找吗？？？箱号是唯一的？

我设置了，但是返回是错误。

micch

1. =VLOOKUP(F2,IF({1,0},表1对比!F:F,表1对比!B:B),2,)

复制代码

烟花00524

micch 发表于 2019-3-21 19:29

谢谢大神，完美解决。

烟花00524

micch 发表于 2019-3-21 19:29

大侠，有没有更快捷的方法，数据量大，运行太慢了

micch

呃，index(表1对比!B:B,match(f2,表1对比!F:F,))    ???????  或者代码

烟花00524

micch 发表于 2019-3-21 20:53
呃，index(表1对比!B:B,match(f2,表1对比!F:F,))    ???????  或者代码

代码是VBA吗，大神方便帮写吗

烟花00524

micch 发表于 2019-3-21 20:53
呃，index(表1对比!B:B,match(f2,表1对比!F:F,))    ???????  或者代码

不用代码了，谢谢大神，这个比VLOOKUP函数快多了，非常感谢您，好人一生平安，谢谢。

micch

1. Sub test()
   
2.     arr = Sheet2.UsedRange
   
3.     Set d = CreateObject("scripting.dictionary")
   
4.     For i = 1 To UBound(arr)
   
5.         d(arr(i, 6)) = arr(i, 2)
   
6.     Next
   
7.     With Sheet1
   
8.         arr = .UsedRange
   
9.         For i = 2 To UBound(arr)
   
10.             arr(i, 2) = d(arr(i, 6))
    
11.     Next
    
12.     .UsedRange = arr
    
13.     End With
    
14. End Sub
    

复制代码