Stránka 1 z 1

Excel aktivní prvek pro tisk

Napsal: 18 úno 2019 16:53
od myschak
Ahoj poradil by mi někdo jak propojit více maker s jedním tlačítkem? Vytvořil jsem si tlačítko (aktivní prvek) a chtěl bych aby se po kliknutí pustilo makro_1 když bude v buňce číslo 1, když bude v buňce číslo 2, tak makro_2 a když číslo 3, tak makro_3. Děkuji pokud mi někdo dokážete poradit.

Re: Excel aktivní prvek pro tisk

Napsal: 18 úno 2019 16:59
od atari
Takhle to nefunguje.
Spouštěcím tlačítkem spustíš spouštěcí makro, které podle zadané hodnoty v buňce zavolá makro_1 nebo makro_2 nebo makro_3

Re: Excel aktivní prvek pro tisk

Napsal: 18 úno 2019 20:14
od guest
Makro spojené s tlačítkem bude prostředníkem. V něm v podstatě jediné - správný parametr pro Application.Run.

Re: Excel aktivní prvek pro tisk

Napsal: 19 úno 2019 17:16
od myschak
Aha a nějaký příklad jak to vytvořit prosím?

Re: Excel aktivní prvek pro tisk  Vyřešeno

Napsal: 19 úno 2019 17:41
od Grimm
Pro buňku A1 na prvním listu.

Kód: Vybrat vše

Sub Spousteci()
Select Case List1.Range("A1").Value
    Case 1
        Call makro1
    Case 2
        Call makro2
    Case 3
        Call makro3
    Case Else
        MsgBox "neplatná hodnota buňky", vbExclamation, "Chyba"
End Select
End Sub