[Mikka]

Доброго времени суток уважаемые. У меня такой вопрос:

Мне нежно написать функцию для excel, которая будет записывать свои данные в переданный в нее диапазон.
Например:

Код:

[Выделить все]

Function test_rng(val As Range)
    val.Cells(1, 1) = "test"
End Function

почему не работает это код ?

[Кулик Алексей aka kpblc]

Пиши ее нежно

Код:

[Выделить все]

Public Function test(addr As Range)
  test = addr.Value + 1
End Function

[Mikka]

Все дело в том, что мне нежно изменить "Чужую ячейку, а не ту в которую записана формула"!

[ETCartman]

Кстати в OpenOffice можно писать функции, возвращающие массивы (например матрицы) - при вооде функции она автоматом заполняет область вниз и вправо. Очень часто их стал использовать в последнее время. Интересно - есть такие в Excel VBA?

[Mikha]

Сообщение от Mikka Мне нежно написать функцию для excel, которая будет записывать свои данные в переданный в нее диапазон.

Напрямую создать такую функцию нельзя, т.к. функция, вызванная прямо или косвенно из ячейки рабочего листа, не может изменять значения других ячеек. Например, если вы попытаетесь включить выражение Range("A3").Value = 123 в функцию, то это вызовет ошибку, а в ячейке будет возвращено сообщение об ошибке #Значение.
Подробности
Там же предложен один из вариантов решения данной проблемы - использовать событие листа Worksheet_Change

[Mikka]

Спасибо большое, я решил свою проблему, как раз при помощи Worksheet_Change

[Сергей Дубина]

Сообщение от ETCartman Кстати в OpenOffice можно писать функции, возвращающие массивы (например матрицы) - при вооде функции она автоматом заполняет область вниз и вправо. Очень часто их стал использовать в последнее время. Интересно - есть такие в Excel VBA?

Мне тоже нужно написать функции, возвращающие массивы . Может кто знает как это делается?

[KronSerg]

А в чём проблема? Присваиваешь ей результат в виде массива и функция возвращает массив.

[Mikha]

>>Сергей Дубина
Примеры использования массивов в процедурах и функциях VBA (на английском)

[Сергей Дубина]

Спасибо KronSerg и Mikha, я в своё время столько копий поломал, а загвоздка в сущей ерунде была....

[KronSerg]

Вот, почитай на русском, може пригодится http://www.mini-soft.ru/soft/vba/index.php