Новости:

Теперь на форум можно залогиниться / зарегистрироваться с помощью ВКонтакте. Уже существующие пользователи могут связать свою учетную запись с аккаунтом ВКонтакте одним кликом в профиле пользователя http://forum.msexcel.ru/index.php?action=profile;area=account

Главное меню

Получить массив индексов элементов других массивов, отвечающих условию

Автор Alexxey, 04.12.2011, 10:47

« назад - далее »

Alexxey

Здравствуйте!

Требуется получить массив индексов элементов других массивов, отвечающих условию.
Моя UDF не работает.
Могли бы Вы просмотреть в чем проблема?

Возможно ли решение вопроса стандартными формулами (т.е. без UDF)?

MCH

формула массива:
=НАИМЕНЬШИЙ(ЕСЛИ(C3:V3<=C1;C4:V4);СТРОКА(A1:ИНДЕКС(A:A;СЧЁТ(1/(C3:V3<=C1)))))
по имеющимся данным создает в ячейке масив {1:2:3:5:6:7:10:11}

MCH

UDF:
Function MyPos(Pmax, Array1)
Dim PosArr() As Integer, i As Integer, N As Integer, Arr
For Each Arr In Array1
    If Arr <= Pmax Then
        ReDim Preserve PosArr(0 To N)
        PosArr(N) = i
        N = N + 1
    End If
    i = i + 1
Next Arr
MyPos = PosArr
End Function

Alexxey

Спасибо за помощь! Буду изучать.
Почему не работает мой вариант с использованием UBound?