Excel VBA在命名表中查找

Question

我在Excel工作表中有一个已命名的表格，我已将其分配给ListObject以便于访问，然后分配到正确的表格。

dim looktbl as list object
Set looktbl = Worksheets("AI").ListObjects("ActionItems")

然后我尝试将其用作vlookup调用的一部分，以将列的标头值与表格中的正确操作项相关联。该表在A中以数字值1 ... 19排列，然后在column B中以相关文本排列。但这给了我一个错误：

Dim AItext as String
AItext = Application.VLookup(tbl.HeaderRowRange(1, cCnt), looktbl.DataBodyRange, 2, False)

当我运行时，我得到Run-time Error '13': Type mismatch

我已经确认tbl.HeaderRowRange(1, cCnt)是debug.print的标头值。我确信这是其中的一部分已被打破，但我不确定它究竟应该是什么样的。