Excel VLookup() 工作表函数中的错误 2042（“N/A”）

Question

需要一些帮助来找出奇怪的 VBA VLOOKUP Type Missmatch错误。 代码真的很简单，因为 sss0 是一个随机数，我想要的只是在一个范围内找到最接近的值（表 'BMD_CDF', Range("A2:B999")）。 在电子表格中，我已经将 Sheets("BMD_CDF").Range("A2:B999") 的格式设置为科学...

Dim LookUp_Range As Range
Dim sss0 As Double
Set LookUp_Range = Sheets("BMD_CDF").Range("A2:B999")

sss0=Application.WorksheetFunction.Max(Rnd(), 0.005)
Debug.Print Application.VLookup(sss0, LookUp_Range, 2, 0)

错误信息

什么范围看起来像

Answer 1

Error 2042 （“N/A”）似乎是由 Excel 工作表函数返回的值引起的：

Aplication.WorksheetFunction.Max(Rnd(), 0.005)

始终小于 1 的值永远不会进入column A指定的值范围 (>6)。 出于测试目的，尝试将其替换为Column A中该范围内的任何数字，例如， sss0 =6.15并修改 VLOOKUP() 语句如下：

Debug.Print Application.VLookup(sss0, LookUp_Range, 2, 1)

（其中 1 代表逻辑TRUE ）以使其工作，即根据您的定义找到最接近的值（不完全匹配）。

希望这可能会有所帮助。