Výuka funkcí Excel VBA: Návrat, Volání, Příklady
Co je funkce?
Funkce je část kódu, která provádí konkrétní úkol a vrací výsledek. Funkce se většinou používají k provádění opakujících se úkolů, jako je formátování dat pro výstup, provádění výpočtů atd.
Předpokládejme, že vyvíjíte program, který počítá úroky z půjčky. Můžete vytvořit funkci, která akceptuje výši půjčky a dobu návratnosti. Funkce pak může použít výši půjčky a dobu splatnosti k výpočtu úroku a vrácení hodnoty.
Proč používat funkce
Výhody použití funkcí jsou stejné jako ty ve výše uvedené části o tom, proč používat podprogramy.
Pravidla pojmenovávání funkcí
Pravidla pro pojmenování fungují stejně jako pravidla ve výše uvedené části o pravidlech pro pojmenování podprogramů.
Syntaxe jazyka VBA pro deklaraci funkce
Private Function myFunction (ByVal arg1 As Integer, ByVal arg2 As Integer) myFunction = arg1 + arg2 End Function
ZDE v syntaxi,
Kód | Akce |
---|---|
|
|
|
|
|
|
|
|
Funkce ukázaná na příkladu:
Funkce jsou velmi podobné podprogramu. Hlavní rozdíl mezi podprogramem a funkcí je v tom, že funkce vrací hodnotu, když je volána. Zatímco podprogram nevrací hodnotu, když je volán. Řekněme, že chcete sečíst dvě čísla. Můžete vytvořit funkci, která přijímá dvě čísla a vrací součet čísel.
- Vytvořte uživatelské rozhraní
- Přidejte funkci
- Napište kód pro příkazové tlačítko
- Vyzkoušejte kód
Krok 1) Uživatelské rozhraní
Přidejte příkazové tlačítko do listu, jak je znázorněno níže
Nastavte následující vlastnosti CommanButton1 na následující.
S / N | ovládání | Vlastnictví | Hodnota |
---|---|---|---|
1 | CommandButton 1 | Jméno | btnAddNumbers |
2 | Titulek | přidat Numbers funkce |
Vaše rozhraní by nyní mělo vypadat následovně
Krok 2) Kód funkce.
- Stisknutím Alt + F11 otevřete okno kódu
- Přidejte následující kód
Private Function addNumbers(ByVal firstNumber As Integer, ByVal secondNumber As Integer) addNumbers = firstNumber + secondNumber End Function
ZDE v kódu,
Kód | Akce |
---|---|
|
|
|
|
|
|
Krok 3) Napište kód, který volá funkci
- Klikněte pravým tlačítkem na btnAddNumbers_Klikněte na příkazové tlačítko
- Vyberte Zobrazit kód
- Přidejte následující kód
Private Sub btnAddNumbersFunction_Click() MsgBox addNumbers(2, 3) End Sub
ZDE v kódu,
Kód | Akce |
---|---|
"MsgBox přidatNumbers(2,3) “ |
|
Krok 4) Spusťte program, získáte následující výsledky
Stáhněte si Excel obsahující výše uvedený kód
Stáhněte si výše uvedený kód Excel
Shrnutí
- Funkce je část kódu, která provádí konkrétní úkol. Funkce po provedení vrací hodnotu.
- Jak podprogramy, tak funkce nabízejí opětovnou použitelnost kódu
- Jak podprogramy, tak funkce pomáhají rozdělit velké kusy kódu na malý spravovatelný kód.