Задание в Excel+VBA

Задание 1

В ячейках H1-L1 указано 5 марок автомобилей, в ячейках H2-L2 указано значения количества автомобиле данной марки, причем 3 значения всегда ненулевые, 2 ячейки всегда пустые (нулей нет, просто пусто)

В ячейки А3-А5 внести формулы так, чтобы были марки с ненулевым количеством.

В ячейки B3-B5 внести формулы нахождения соответствующего значения количества авто данной марки

Пример формулы:ЕСЛИОШИБКА(ИНДЕКС(A$1:A$20;НАИМЕНЬШИЙ(ЕСЛИ(A$2:A$20;СТРОКА(A$2:A$20));СТРОКА(A1)));"")

Задание 2

Создать пользовательскую функцию, имеющую краткое и емкое название, реализующую пример формулы ИНДЕКС(B$1:$B$5;ПОИСКПОЗ(A19;$A$1:$A$5;0)), то есть ИНДЕКС([диапазон значений];ПОИСКПОЗ([наименование того, что ищем];[диапазон наименований];0)). Предоставить код VBA полученной функции

При быстром и правильном выполнении отзыв, разблокировка.