excel - 具有多个条件的 XLOOKUP

Question

我正在尝试将多标准 XLookup 公式转换为 VBA，但我不断得到

错误 13 类型不匹配。

具有单一标准的简单 XLookup 工作正常，因此它必须与我尝试连接我的要求的方式有关。

Sub Test1()

    'This works fine
    Range("F18").Value = Application.WorksheetFunction.XLookup(Range("F13").Value, Range("C:C"), Range("A:A"))

    'This gives Error 13 Type Mismatch
    Range("H18").Value = Application.WorksheetFunction.XLookup(Range("H11").Value & Range("H13").Value, Range("C:C") & Range("D:D"), Range("A:A"))

End Sub

本机公式=XLOOKUP(H11&H13,C:C&D:D,A:A)在 Excel 中运行良好，因此必须有一种在 VBA 中编写它的方法。

标签： excelvba