Ce este o funcție?
O funcție este o bucată de cod care efectuează o sarcină specifică și returnează un rezultat. Funcțiile sunt utilizate mai ales pentru a efectua sarcini repetitive, cum ar fi formatarea datelor pentru ieșire, efectuarea calculelor etc.
Să presupunem că dezvoltați un program care calculează dobânzile la un împrumut. Puteți crea o funcție care acceptă suma împrumutului și perioada de rambursare. Funcția poate utiliza apoi valoarea împrumutului și perioada de rambursare pentru a calcula dobânda și a restitui valoarea.
De ce să folosiți funcțiile
Avantajele utilizării funcțiilor sunt aceleași cu cele din secțiunea de mai sus, de ce se utilizează subrutine.
Reguli de numire a funcțiilor
Regulile de numire funcționează la fel ca cele din secțiunea de mai sus privind regulile de numire a subrutinelor.
Sintaxă VBA pentru declararea funcției
Private Function myFunction (ByVal arg1 As Integer, ByVal arg2 As Integer)myFunction = arg1 + arg2End Function
AICI în sintaxă,
Cod | Acțiune |
---|---|
|
|
|
|
|
|
|
|
Funcția demonstrată cu Exemplu:
Funcțiile sunt foarte asemănătoare cu subrutina. Diferența majoră dintre un subrutină și o funcție este că funcția returnează o valoare când este apelată. În timp ce un subrutină nu returnează o valoare, atunci când este apelată. Să presupunem că doriți să adăugați două numere. Puteți crea o funcție care acceptă două numere și returnează suma numerelor.
- Creați interfața cu utilizatorul
- Adăugați funcția
- Scrieți codul pentru butonul de comandă
- Testați codul
Pasul 1) Interfața utilizatorului
Adăugați un buton de comandă în foaia de lucru așa cum se arată mai jos
Setați următoarele proprietăți ale CommanButton1 la următoarele.
S / N | Control | Proprietate | Valoare |
---|---|---|---|
1 | Butonul Command1 | Nume | btnAddNumbers |
2 | Legendă | Funcția Adăugați numere |
Interfața dvs. ar trebui să apară acum după cum urmează
Pasul 2) Codul funcției.
- Apăsați Alt + F11 pentru a deschide fereastra de cod
- Adăugați următorul cod
Private Function addNumbers(ByVal firstNumber As Integer, ByVal secondNumber As Integer)addNumbers = firstNumber + secondNumberEnd Function
AICI în cod,
Cod | Acțiune |
---|---|
|
|
|
|
|
|
Pasul 3) Scrieți codul care apelează funcția
- Faceți clic dreapta pe butonul de comandă btnAddNumbers_Click
- Selectați Vizualizare cod
- Adăugați următorul cod
Private Sub btnAddNumbersFunction_Click()MsgBox addNumbers(2, 3)End Sub
AICI în cod,
Cod | Acțiune |
---|---|
„MsgBox addNumbers (2,3)” |
|
Pasul 4) Rulați programul, veți obține următoarele rezultate
Descărcați Excel care conține codul de mai sus
Descărcați codul Excel de mai sus
Rezumat:
- O funcție este o bucată de cod care efectuează o sarcină specifică. O funcție returnează o valoare după executare.
- Atât subrutinele, cât și funcțiile oferă reutilizarea codului
- Atât subrutinele, cât și funcțiile ajută la descompunerea unor bucăți mari de cod în cod mic de gestionat.