Tento tutoriál vás naučí, jak volat funkci z dílčí procedury ve VBA.
Když vytvoříte funkci ve VBA, můžete ji použít buď jako UDF (uživatelem definovaná funkce) v excelovém sešitu, nebo ji můžete zavolat z dílčí procedury.
Volání funkce z dílčí procedury
Jakmile vytvoříte funkci, můžete ji volat odkudkoli v kódu pomocí funkce Sub Procedura k volání funkce.
Zvažte níže uvedenou funkci:
| 123 | Funkce GetValue () jako celé čísloGetValue = 50Koncová funkce |
Protože funkce vracejí hodnotu, abychom funkci mohli volat, musíme hodnotu něčemu předat. V tomto případě předáme hodnotu proměnné:
| 123456789 | Dílčí testovací hodnoty ()Dim intVal jako celé číslo'spusťte funkci GetValueintVal = GetValue ()“a ukažte hodnotuMsgBox intValEnd Sub |
Volání funkce s parametry
Pokud má funkce parametry, budete muset tyto parametry předat z dílčí procedury do funkce, abyste získali správnou hodnotu zpět.
| 123 | Funkce GetValue (intA jako Integer) Jako IntegerGetValue = intA * 5Koncová funkce |
K volání této funkce můžeme spustit následující dílčí proceduru.
| 123 | Dílčí testovací hodnoty ()MsgBox GetValue (10)End Sub |
Tento dílčí postup by odeslal funkci hodnotu 10, která by následně tuto hodnotu vynásobila 5 a vrátila hodnotu na 50 do dílčí procedury.
