nSectionSetupRow = Application.WorksheetFunction.Match( _
Worksheets("Items").Cells(nRow, 1), _
Worksheets("SectionSetup").Range("B1:B" & _
Worksheets("SectionSetup").Range("A1").End(xlDown).Row), 0)
我在这里面临问题并使用 Excel 97-2003 工作表类型的 Excel
Application.WorksheetFunction.Match
如果没有匹配,将引发运行时错误。
Application.Match
相反,将返回一个错误值,您可以使用该值进行测试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
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)