You can use worksheet functions within VBA by use of the WorksheetFunctionObject.

Something like....

X = Worksheetfunction.Sum(--worksheetfunction.IsNumber(worksheetfunction.Match.....
...maybe?