Match возвращает прикладную или объектную ошибку VBA
Я использовал WorksheetFunction.Match почти одинаково, и во второй раз я получаю сообщение об ошибке. Вот первый раз:
'First find the minimum for the inlet
Dim InletRange As Range
Set InletRange = Range(Cells(9, 2), Cells(LastRow, 2))
InletRange.Activate
InletMin = WorksheetFunction.MIn(InletRange)
peak = WorksheetFunction.Match(InletMin, (InletRange))
In_PeakTime = sht.Cells(8 + peak, 1)
Он возвращает результат Variant/Double для пика и отлично работает для In_PeakTime.
Затем я использую почти идентичный скрипт для поиска Out_PeakTime.
Я получаю сообщение об ошибке в строке opeak. Ошибка времени выполнения "1004": ошибка приложения или объекта
Значение OutletMin - Variant/Double 5.22, и я дважды проверил, что диапазон правильный, и это так. Он выбирает только другие двойники, и значение 5,22 определенно там, потому что я нашел Min из этого диапазона.
'Second find the minimum for the outlet
Dim OutletRange As Range
Set OutletRange = Range(Cells(9, 4), Cells(LastRow, 4))
OutletRange.Activate
OutletMin = WorksheetFunction.MIn(OutletRange)
opeak = WorksheetFunction.Match(OutletMin, OutletRange)
Out_PeakTime = sht.Cells(8 + opeak, 1)
Какие-либо предложения?