Makro – práce s proměnnými
S tímto tématem se setkáte na našich kurzech ExcelTown.
Aktuálně: kurzy můžete absolvovat jak online, tak prezenčně.
Příklad
Potřebuji vytvořit makro, které bude na základě délky dvou stran počítat obsah obdélníka.
Uživatel tedy zadá stranu "a", stranu "b" a aplikace mu oznámí obsah čtverce (násobek dvou údajů). Je zřejmé, že toto by se dalo řešit mnohem efektivněji - jde ale o ukázku prvků makra.
Návod
Makro vypadá takto:
Sub obsah_obdelnika()
prvni_strana = Application.InputBox("Zadejte jednu stranu obdelnika", "Zadejte číslo")
druha_strana = Application.InputBox("Zadejte druhou stranu obdelnika", "Zadejte číslo")
obsah = prvni_strana * druha_strana
MsgBox (obsah)
End Sub
Vysvětlení makra:
- Sub obsah_obdelnika()
- Začátek makra, které se jmenuje "obdelnik"
- prvni_strana = Application.InputBox("Zadejte jednu stranu obdelnika", "Zadejte číslo")
- Zobrazím dialog s titulkem "Zadejte číslo" a textem "Zadejte jednu stranu obdelnika"). To, co uživatel zadá, se načte do proměnné "prvni_strana".
- druha_strana = Application.InputBox("Zadejte druhou stranu obdelnika", "Zadejte číslo")
- Obdoba předchozího
- obsah = prvni_strana * druha_strana
- Součin proměnných do proměnné "obsah".
- MsgBox (obsah)
- Zobrazení zprávy s obsahem čtverce
- End Sub
- Konec makra
S tímto tématem se setkáte na našich kurzech ExcelTown.
Aktuálně: kurzy můžete absolvovat jak online, tak prezenčně.