尝试在Application.WorksheetFunction.MATCH中使用布尔逻辑并获得类型不匹配错误

Question

我有一个工作表函数，在工作表中工作得很好，但是，当我试图在宏中重现它时，我收到运行时错误13类型不匹配。工作表中的函数是:

=指数(TBQA[问题],匹配(真的,指数(TBQA[答案]= TBQA @Answer, 0), 0))

我从中绘制值的表名为"TBQA"。在宏的一部分中，我试图引用的两列是"问题"。和";Answer"。我有一个UserForm ComboBox，我使用它作为比较参考源，名为"TBABox"当我点击一个按钮时，我想索引"问题"中的值;与"答案"中的答案相匹配的列。列(它是ComboBox下拉值的来源)。

Private Sub ShowMeQues_Click()
Dim ws1 As Worksheet
Dim ws2 As Worksheet
Set ws1 = Sheets("Information")
Set ws2 = Sheets("Resource")
MsgBox Application.WorksheetFunction.Index(ws1.Range("TBQA[Question]"), _
Application.WorksheetFunction.Match("TRUE", _
Application.WorksheetFunction.Index(ws1.Range("TBQA[Answer]") = TBABox.Value, 0), 0))
End Sub

我相信当我试图获得一个"true"时，会出现这个问题。值，其中ws1.Range("TBQA[Answer]") = TBABox。价值，但我可能错了。请帮助。我觉得这是一个简单的解决方案，我只是忽视了，但我一直在互联网上搜索寻找一个解决方案，但无济于事。欢迎提出任何建议。谢谢你! !:)

Answer 1

我可以通过另一条路线解决这个问题!我的主要目标是通过MATCH函数绕过VBA设置的255个字符限制。请参阅我的其他帖子的决议，我想出了。谢谢你的帮助!!

https://stackoverflow.com/a/72582313/10443879