Совпадение не указывает правильный индекс в сочетании с большим - PullRequest
0 голосов
/ 26 мая 2020

У меня есть короткий вектор-строка (0,0, 1,0, 0,1, 0,9, 0,8, 0,2, 0,3, 0,7, 0,6, 0,4, 0,5) в Excel. Я пытаюсь выбрать индекс по рангу, используя ПОИСКПОЗ для аргумента БОЛЬШОЙ. Распечатка показывает, что это не работает. Не могли бы вы прокомментировать / помочь?

Sub rank()
Dim rng As Range
Dim sample As Variant
Dim reference As Single
Dim j As Long

Set rng = Sheets("Sheet1").Range("B3").CurrentRegion
sample = rng.Value
' Debug.Print LBound(sample, 2); UBound(sample, 2)

For j = LBound(sample, 2) To UBound(sample, 2)
    Debug.Print j, Application.Large(Application.Index(sample, 1, 0), j), _
    Application.Match(Application.Large(Application.Index(sample, 1, 0), j), sample)
Next j

End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...