Deze tutorial leert je hoe je een functie aanroept vanuit een subprocedure in VBA.
Wanneer u een functie in VBA maakt, kunt u de functie gebruiken als een UDF (User Defined Function) in uw Excel-werkmap, of u kunt deze aanroepen vanuit een subprocedure.
Een functie aanroepen vanuit een subprocedure
Nadat u een functie hebt gemaakt, kunt u deze vanuit elke andere plaats in uw code aanroepen door een subprocedure te gebruiken om de functie aan te roepen.
Beschouw de functie hieronder:
| 123 | Functie GetValue() Als geheel getalGetValue = 50Functie beëindigen |
Omdat functies een waarde retourneren, moeten we de waarde ergens aan doorgeven om de functie aan te roepen. In dit geval geven we de waarde door aan een variabele:
| 123456789 | Subtestwaarden()Dim intVal als geheel getal'voer de GetValue-functie uit'intVal = GetValue()'en toon de waarde'MsgBox intValEinde sub |
Een functie aanroepen met parameters
Als de functie parameters heeft, moet u deze parameters van de subprocedure doorgeven aan de functie om de juiste waarde terug te krijgen.
| 123 | Functie GetValue(intA als geheel getal) als geheel getalGetValue = intA * 5Functie beëindigen |
Om deze functie aan te roepen, kunnen we de volgende subprocedure uitvoeren.
| 123 | Subtestwaarden()MsgBox GetValue(10)Einde sub |
Deze subprocedure zou de waarde van 10 naar de functie sturen, die op zijn beurt die waarde met 5 zou vermenigvuldigen en de waarde zou teruggeven aan 50 aan de subprocedure.
