Vodič za Excel VBA funkcije: Povratak, poziv, primjeri
Što je funkcija?
Funkcija je dio koda koji izvršava određeni zadatak i vraća rezultat. Funkcije se uglavnom koriste za izvršavanje zadataka koji se ponavljaju kao što su formatiranje podataka za izlaz, izvođenje izračuna itd.
Pretpostavimo da razvijate program koji izračunava kamate na kredit. Možete izraditi funkciju koja prihvaća iznos kredita i rok otplate. Funkcija zatim može koristiti iznos zajma i razdoblje otplate za izračun kamate i vraćanje vrijednosti.
Zašto koristiti funkcije
Prednosti korištenja funkcija iste su kao one u gornjem odjeljku zašto koristiti potprograme.
Pravila imenovanja funkcija
Pravila za imenovanje funkcija ista su kao ona u gornjem odjeljku o pravilima za imenovanje potprograma.
VBA sintaksa za deklariranje funkcije
Private Function myFunction (ByVal arg1 As Integer, ByVal arg2 As Integer) myFunction = arg1 + arg2 End Function
OVDJE u sintaksi,
Kodirati | Akcijski |
---|---|
|
|
|
|
|
|
|
|
Funkcija prikazana primjerom:
Funkcije su vrlo slične potprogramu. Glavna razlika između potprograma i funkcije je u tome što funkcija vraća vrijednost kada se pozove. Dok potprogram ne vraća vrijednost kada se pozove. Recimo da želite zbrojiti dva broja. Možete stvoriti funkciju koja prihvaća dva broja i vraća zbroj brojeva.
- Izradite korisničko sučelje
- Dodajte funkciju
- Napišite kod za naredbeni gumb
- Testirajte kod
Korak 1) Korisničko sučelje
Dodajte naredbeni gumb na radni list kao što je prikazano u nastavku
Postavite sljedeća svojstva CommanButton1 na sljedeće.
S / N | kontrola | Svojstvo | Još malo brojeva |
---|---|---|---|
1 | CommandButton1 | Ime i Prezime | btnDodajNumbers |
2 | Naslov | dodati Numbers funkcija |
Vaše sučelje sada bi trebalo izgledati na sljedeći način
Korak 2) Kod funkcije.
- Pritisnite Alt + F11 da biste otvorili prozor koda
- Dodajte sljedeći kod
Private Function addNumbers(ByVal firstNumber As Integer, ByVal secondNumber As Integer) addNumbers = firstNumber + secondNumber End Function
OVDJE u kodu,
Kodirati | Akcijski |
---|---|
|
|
|
|
|
|
Korak 3) Napišite kod koji poziva funkciju
- Desni klik na btnAddNumbers_ Kliknite gumb naredbe
- Odaberite Pregled koda
- Dodajte sljedeći kod
Private Sub btnAddNumbersFunction_Click() MsgBox addNumbers(2, 3) End Sub
OVDJE u kodu,
Kodirati | Akcijski |
---|---|
“MsgBox dodatiNumbers(jedan)" |
|
Korak 4) Pokrenite program i dobit ćete sljedeće rezultate
Preuzmite Excel koji sadrži gornji kod
rezime
- Funkcija je dio koda koji obavlja određeni zadatak. Funkcija vraća vrijednost nakon izvršenja.
- I potprogrami i funkcije nude mogućnost ponovne upotrebe koda
- I potprogrami i funkcije pomažu rastaviti velike komade koda u mali upravljivi kod.