Пытливый, спасибо. На дальнейших примерах все корректно сработало.
Sanja, почему то некорректно работает на следующем примере. Прикладываю.

Здравствуйте.  
Необходима помощь в создании функции, которая должна определять порядковый номер элемента в диапазоне, вместе с которым накопительная сумма всех предыдущих элементов становится равной либо превышает заданный критерий.

Во вложении пример массива (D2:H2)
Задан критерий (целевое значение суммы элементов): E4= 370
Функция начинает последовательно суммировать элементы массива, начиная с первого до тех пор, пока сумма элементов не станет равной или превысит 370. Выводит номер порядковый номер элемента, при котором выполнилось данное условие. В данном случае условие выполнилось на элементе №3.
Спасибо.

Здравствуйте.
Подскажите, пожалуйста, каким образом изменится код для VBA, если задача функции будет не суммирование, а определение порядкового номера элемента в диапазоне, вместе с которым накопительная сумма всех предыдущих элементов становится равной либо превышает критерий.