Общая структура построения функций пользователя

Определение функций пользователя.

Function F(аргумент ₁, аргумент ₂,…, аргумент _n)

F = <арифметическое выражение>

End Function

где F- имя функции; <аргументы>- простые переменные - формальные аргументы (формальные параметры) функции; <арифметическое выражение>- формула, по которой вычисляется функция.

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

Пример 2. Вычислить значение функции

, где .

Здесь m - номер варианта, n –номер группы.

1- й вариант программы:

В окно для вставки кода записываем:

Function F(X, Y)

F = Cos(X ^ 2 + Y ^ 2)

End Function

Sub main()

m = Cells(1, 2)

n = Cells(2, 2)

Z = (F(m / n, -2 * n) + F(3 * (m + n), -5.5 * m)) / (2 * (m + n))

Cells(3, 1) = "z="

Cells(3, 2) = Z

End Sub

В ячейки Excel A1 и B1 записываем m=, 13 соответственно, и в A2 и B2 - n=, 5. Выполним программу, нажав F5. Получим:

2- й вариант программы:

В окно для вставки кода записываем:

Function F(X, Y)

F = Cos(X ^ 2 + Y ^ 2)

End Function

В ячейки Excel A1 и B1 записываем m=, 13 соответственно, и в A2 и B2 - n=, 5. Далее, в ячейку Excel B3 записываем формулу:

=(F(B1/B2;-2*B2)+F(3*(B1+B2);-5,5*B2))/2/(B1+B2)

При записи этой формулы можно пользоваться технологией вызова функций Excel (нажав кнопку fxи выбрав категорию – функции пользователя). В результате в ячейке B3 появится результат: 0,02524.