Функция за повикване VBA от Sub

Този урок ще ви научи как да извиквате функция от подпроцедура във 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 към подпроцедурата.

wave wave wave wave wave