Този урок ще ви научи как да извиквате функция от подпроцедура във VBA.
Когато създавате функция във VBA, можете или да използвате функцията като UDF (Потребителска функция) във вашата работна книга на Excel, или да я извикате от подпроцедура.
Извикване на функция от подпроцедура
След като създадете функция, можете да я извикате от всяко друго място в кода си, като използвате подпроцедура за извикване на функцията.
Помислете за функцията по -долу:
123 | Функция GetValue () като цяло числоGetValue = 50Крайна функция |
Тъй като функциите връщат стойност, за да извикаме функцията, трябва да предадем стойността на нещо. В този случай ще предадем стойността на променлива:
123456789 | Sub TestValues ()Dim intVal като цяло число'стартирайте функцията GetValueintVal = GetValue ()'и покажете стойносттаMsgBox intValEnd Sub |
Извикване на функция с параметри
Ако функцията има параметри, ще трябва да предадете тези параметри от подпроцедурата на функцията, за да получите обратно правилната стойност.
123 | Функция GetValue (intA като цяло число) като цяло числоGetValue = intA * 5Крайна функция |
За да извикаме тази функция, можем да изпълним следната подпроцедура.
123 | Sub TestValues ()MsgBox GetValue (10)End Sub |
Тази подпроцедура ще изпрати стойността на 10 до функцията, която от своя страна ще умножи тази стойност по 5 и ще върне стойността на 50 към подпроцедурата.