У меня есть этот код:
Dim wsFunc As WorksheetFunction: Set wsFunc = Application.WorksheetFunction
Dim ws As Worksheet: Set ws = Sheets("2012")
Dim rngLook As Range: Set rngLook = ws.Range("A:M")
'within a loop
currName = "Example"
cellNum = wsFunc.VLookup(currName, rngLook, 13, False)
Ожидается, что VLookup всегда найдет результат; но когда он не найдет результата, ошибки в строке до того, как я смогу даже проверить ошибку, следующая строка.
Ошибка:
Ошибка времени выполнения "1004": невозможно получить свойство VLookup класса WorksheetFunction
Он отлично работает, когда результат найден. Какой хороший способ обработки ошибок здесь?