Run time error '1004' Unable to get the Match property of the WorksheetFunction class

Question

nSectionSetupRow = Application.WorksheetFunction.Match( _
      Worksheets(\"Items\").Cells(nRow, 1), _
      Worksheets(\"SectionSetup\").Range(\"B1:B\" & _
      W         


        

Answer 1

Application.WorksheetFunction.Match will raise a run-time error if there's no match.

Application.Match will instead return an error value which you can test for using IsError()

E.g:

Dim m 'variant
m = Application.Match(lookupValue, lookupRange, 0)
If Not IsError(m) Then
    'got a match
Else
    'no match
End If