工作表公式转VBA公式：VBA代码无报错却无法获取Num数值

我编写了如下VBA代码，运行时无报错，但无法为变量Num获取数值，推测是工作表公式与VBA公式的转换存在问题。

原代码：

Dim Num As Integer
Num = WorksheetFunction.Match(1, WorksheetFunction.Index(WorksheetFunction.N(Range("A:A") = "XXX"), 0), 0)

已通过Evaluate公式解决问题，代码如下：

Num = Worksheet(sheet1).Evaluate("MATCH(1,INDEX(N(A:A=""XXX""),0),0)")

感谢各位回复。

内容的提问来源于stack exchange，提问作者saho