excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: Ako dostať pod jedno tlačítko všetky makrá
Asi hovoríš v cudzej reči.
To čo požaduješ, je vhodné napísať v prvom príspevku a nie až v poslednom.citovat
geniálne, super, veľmi pekne ďakujemcitovat
MS Excel
Téma: Ako dostať pod jedno tlačítko všetky makrá 
Zaslal/a kabaka 12.11.2016 8:21
Viem urobiť jedno tlačitko pre jedno makro. Ale chcela by som aby všetky makrá boli pod jedným tlačitkom. Len neviem ako to spraviť.
Ďakujem za pomoc.
Téma nadväzuje na otázku
http://wall.cz/index.php?m=topic&id=33319
Příloha: 
33416_33319_obrazky.zip (160kB, staženo 38x)
33416_33319_obrazky.zip (160kB, staženo 38x)(12.11.2016 10:20)#033418
Z toho, co píšeš, předpokládám, že využíváš tlačítko ze sady "Ovládací prvky formuláře". Tam jde přiřadit primárně pouze jedno makro. Z jednoho makra lze ovšem volat jiné makro, příp. několik maker. Dá se to tedy vyřešit tak, že si uděláš makro, které nebude dělat nic jiného, než volat jiná makra.
Sub Makro_ktere_vola_jina_makra()
Call NazevMakra1
Call NazevMakra2
Call NazevMakra3
End Sub
Dalším řešením je využití jiného typu tlačítka - Ovládací prvky ActiveX (Vývojář / Vložit). U tohoto typu tlačítka lze psát kód přímo pro dané tlačítko.
Private Sub CommandButton1_Click()
Call NazevMakra1
Call NazevMakra2
Call NazevMakra3
End Sub
Možností je více.
P.citovat
Sub Makro_ktere_vola_jina_makra()
Call NazevMakra1
Call NazevMakra2
Call NazevMakra3
End Sub
Dalším řešením je využití jiného typu tlačítka - Ovládací prvky ActiveX (Vývojář / Vložit). U tohoto typu tlačítka lze psát kód přímo pro dané tlačítko.
Private Sub CommandButton1_Click()
Call NazevMakra1
Call NazevMakra2
Call NazevMakra3
End Sub
Možností je více.
P.citovat
Asi som sa nevyjadrila správne. Áno zmienené makrá vyvolajú ostatné makrá a obrázky, ale premelú sa a neostanú. Mne ide o taký systém, že si budem môcť vybrať, ktoré makro chcem vyvolať.
Viem, že sa to dá spraviť cez Definovať názvov Overenie dát, Prilepiť prepojenie - ale funguje to len pri jedna bunka-jedena obrázok. (Myslím.)Z rozvieracieho zoznamu sa dá vybrať, ktorý obrázok. Lenže to je v rámci listu, alebo z listu do listu a mne to ťahá makrom z priečinka.
Takto by mohlo fungovať aj to makro.
Kliknem na tlačitko, vyberiem zo zoznamu obr1, ktoré vyvolá makro s obrázkom1, vyberiem obr2, vyvolá makro s obázkom2.
http://www.porada.sk/t187640-ms-excel.htmlcitovat
Viem, že sa to dá spraviť cez Definovať názvov Overenie dát, Prilepiť prepojenie - ale funguje to len pri jedna bunka-jedena obrázok. (Myslím.)Z rozvieracieho zoznamu sa dá vybrať, ktorý obrázok. Lenže to je v rámci listu, alebo z listu do listu a mne to ťahá makrom z priečinka.
Takto by mohlo fungovať aj to makro.
Kliknem na tlačitko, vyberiem zo zoznamu obr1, ktoré vyvolá makro s obrázkom1, vyberiem obr2, vyvolá makro s obázkom2.
http://www.porada.sk/t187640-ms-excel.htmlcitovat
Nepoužívejte tlačítko, ale combobox
Příloha: 33423_sesit1.zip (17kB, staženo 38x)
citovat33423_sesit1.zip (17kB, staženo 38x)kabaka napsal/a:
Asi som sa nevyjadrila správne.
Asi hovoríš v cudzej reči.
To čo požaduješ, je vhodné napísať v prvom príspevku a nie až v poslednom.citovat
Ja som myslela, že som to napísala jasne, ale asi nie.
Ale stále neviem, ako správne vložiť kód makra do comboxu, aby mi to fungovalo. Je možné mi urobiť ten rozvierací zoznam v mojom súbore? Skúšam to, ale zatiaľ neúspešne.citovat
Ale stále neviem, ako správne vložiť kód makra do comboxu, aby mi to fungovalo. Je možné mi urobiť ten rozvierací zoznam v mojom súbore? Skúšam to, ale zatiaľ neúspešne.citovat
(12.11.2016 12:54)#033427
a) Alt+F8
b) Makro -> Userform + ComboBox se seznamem maker nebo já nevím InputBox -> Select Case + Application.Runcitovat
b) Makro -> Userform + ComboBox se seznamem maker nebo já nevím InputBox -> Select Case + Application.Runcitovat
Abys nemusela vyrábět UF, tak třeba toto ...
PS: Chrobáčik to je teda zadání ...
PS: Chrobáčik to je teda zadání ...
Příloha: 33429_test.zip (201kB, staženo 69x)
citovat33429_test.zip (201kB, staženo 69x)kp57 napsal/a:
Abys nemusela vyrábět UF, tak třeba toto ...
PS: Chrobáčik to je teda zadání ...Příloha: 33429_test.zip
geniálne, super, veľmi pekne ďakujemcitovat
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Helios iNuvio
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.
RSS nejnovější články