Denne vejledning lærer dig, hvordan du kalder en funktion fra en underprocedure i VBA.
Når du opretter en funktion i VBA, kan du enten bruge funktionen som en UDF (brugerdefineret funktion) i din Excel -projektmappe, eller du kan kalde den fra en underprocedure.
Opkald til en funktion fra en underprocedure
Når du har oprettet en funktion, kan du kalde den fra andre steder i din kode ved at bruge en delprocedure til at kalde funktionen.
Overvej funktionen herunder:
123 | Funktion GetValue () som heltalGetValue = 50Afslut funktion |
Fordi funktioner returnerer en værdi, for at kunne kalde funktionen, skal vi videregive værdien til noget. I dette tilfælde videregiver vi værdien til en variabel:
123456789 | Subtestværdier ()Dim intVal som heltal'kør GetValue -funktionenintVal = GetValue ()'og vis værdienMsgBox intValAfslut Sub |
Opkald til en funktion med parametre
Hvis funktionen har parametre, skal du sende disse parametre fra delproceduren til funktionen for at få den korrekte værdi tilbage.
123 | Funktion GetValue (intA som heltal) Som heltalGetValue = intA * 5Afslut funktion |
For at kalde denne funktion kan vi køre følgende delprocedure.
123 | Subtestværdier ()MsgBox GetValue (10)Afslut Sub |
Denne delprocedure sender værdien 10 til funktionen, hvilket igen vil multiplicere denne værdi med 5 og returnere værdien til 50 til delproceduren.