在数组中查找最后的单元格值
我正在寻找一个VBA代码来查找列中数组中的最后一个值。 使用函数LOOKUP(C1; A:B)也是可行的,但是我想用VBA来完成。 我已经尝试过使用函数:x = Application.Worksheetfunction.Lookup(Range(“C1”),Range(“A:B”))但是没有奏效。 数据看起来像这样:
- A:B
- 1:10
- 1:12
- 2:20
- 2:25
- 2:30
- 3:35
- 3:40
- 4:45
- 4:50
- 4:55
因此,1必须返回12,2 – > 30,3 – > 40和4 – > 55。
在OP的进一步请求之后编辑
我想你可能会在这之后:
With Range("C1") If IsError(Application.Match(.Value, Range("A:A"), 0)) Then MsgBox "Sorry, no match for " & .Value & " in column A" Else Range("H7").Value = Application.VLookup(.Value, Range("A:B"), 2) End If End With
用你的例子,我想你想:
Application.Worksheetfunction.VLookup(Range("C1"), Range("A:B"),2)