В этом руководстве вы узнаете, как вызвать функцию из подпроцедуры в VBA.
Когда вы создаете функцию в VBA, вы можете использовать ее как UDF (определяемую пользователем функцию) в своей книге Excel или вызывать ее из подпроцедуры.
Вызов функции из подпроцедуры
Создав функцию, вы можете вызывать ее из любого другого места в коде, используя подпроцедуру для вызова функции.
Рассмотрим функцию ниже:
123 | Функция GetValue () как целое числоGetValue = 50Конечная функция |
Поскольку функции возвращают значение, чтобы вызвать функцию, мы должны передать значение чему-то. В этом случае мы передадим значение переменной:
123456789 | Sub TestValues ()Dim intVal как целое число'запускаем функцию GetValueintVal = GetValue ()'и покажите значениеMsgBox intValКонец подписки |
Вызов функции с параметрами
Если функция имеет параметры, вам нужно будет передать эти параметры из подпроцедуры в функцию, чтобы вернуть правильное значение.
123 | Функция GetValue (intA как целое число) как целое числоGetValue = intA * 5Конечная функция |
Чтобы вызвать эту функцию, мы можем запустить следующую подпроцедуру.
123 | Sub TestValues ()MsgBox GetValue (10)Конец подписки |
Эта подпроцедура отправит значение 10 в функцию, которая, в свою очередь, умножит это значение на 5 и вернет значение 50 в подпроцедуру.