excel - VBA 查找错误 - 尝试在此处进行研究但找不到有效的答案

Question

这里的新手试图在线查找代码示例。我尝试搜索此答案，但找不到有效的答案 -

尝试使用查找从不同工作表的表中提取特定值。

Sheet6(测试)有:

A2:A5 = Red, Green, Blue, Yellow.
B2:B5 = Apple, Banana, Berry, Lemon

A9 (The lookup value) = Blue 

我希望 VBA 在 B9 中输入“Berry”。

我试过的代码是:

Sub VBA_Lookup1()
   Range("B9").value = worksheetfunction.lookup(Range("A9").value,Range("A2:A5"),Range("B2:B5"))
End Sub

运行时出现错误消息“无法获取工作表函数类的查找属性”

最终，我希望查找值在一张工作表中，而表格在另一张工作表中，但我什至无法让它在测试中工作。

此外，如果有比查找更好的查找或其他功能，我会洗耳恭听!

Answer 1

尝试(假设 active sheet 是 A9 所在的位置:

With Worksheets("Sheet6")
   Range("B9").Value = WorksheetFunction.VLookup(Range("A9").Value, .Range("A2:B5"), 2, 0)
End With