Для начала создадим в редакторе VBA макрос и назовём его macro1(). После этого создадим шаблон для нашей функции, которую назовём f(). Общей сложности получаем следующий код:

Допустим, мы хотим, чтобы наша функция выводила какое-нибудь приветственное сообщение, например «Добрый день!».

Также мне хотелось бы продемонстрировать процесс передачи параметров в функцию, поэтому наша функция будет принимать извне переменную message.

Алгоритм работы будет следующий: макрос macro1 вызывает функцию f() и передаёт ей переменную message. Далее функция f() выводим значение переменной message в виде сообщения.

Код нашего макроса преобразуется к следующему виду.

Sub macro1()
     message = "Добрый день!"
     f1 = f(message)
End Sub
Function f(m)
     MsgBox m
End Function

Разберём представленный код.

«message = "Добрый день!"» - присваиваем переменной «message» значение «Добрый день!»

«f1 = f(message)» - вызываем функцию f()и передаём в качестве её параметра переменную «message».

«MsgBox m» - выводим значение переменной m на экран в виде сообщения.

После сохранения макроса и его запуска получаем следующий результат.

Содержание                                               Предыдущая << • >> Cледующая                                               Автор:Muha

---