[QUOTE=Leto III;1529567]Как-то так:
Average(Range("A1:A5"))
Можно нажав на нужном слове F1 почитать подробный хелп, а ещё можно, записав макрос, посмотреть, что получилось.
Ээээмммм... Я хоть и начинал когда-то с Бейсика, уже подзабыл, как грабли называются. Может, переформулируешь задачу понятнее?
Вложение 13058
Тут не которые вопросы по поводу рекурсии где надо задать функцию в основном цикле, т.к. при изменении в формуле выдает ошибку 28 а так же командам Vba sum