automatické spuštění makra/změnou buňky Vyřešeno

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

Lůjík
nováček
Příspěvky: 19
Registrován: listopad 13
Pohlaví: Žena
Stav:
Offline

automatické spuštění makra/změnou buňky

Příspěvekod Lůjík » 09 lis 2013 17:42

Ahoj lidi :)
Ráda bych Vás požádala o radu. Snažím se o naprogramování makra tak, aby při zápisu do buňky (např. A1) písmene "a" se skryl list3, při napsání "b" se list objevil. Toto makro jsem si již sama naprogramovala, setkala jsem se ale s problémem. Potřebuji, aby se makro spustilo při jakékoli změně v buňce A1, nechci makro napárovat na žádné tlačítko, ani aby se spustilo při otevření sešitu.
Mohl byste mi, prosím, nějak pomoci?
Budu Vám nadosmrti vděčná :)
Děkuji, Lucka
Přílohy
skryt list.xlsm
(14.24 KiB) Staženo 29 x

Reklama
cmuch
Level 4.5
Level 4.5
Příspěvky: 1547
Registrován: březen 11
Bydliště: Drsná Vysočina :D
Pohlaví: Muž
Stav:
Offline

Re: automatické spuštění makra/změnou buňky

Příspěvekod cmuch » 09 lis 2013 17:53

Vítej na PC-Help

Do modulu listu1 vlož

Kód: Vybrat vše

Private Sub Worksheet_Change(ByVal Target As Range)

  If Range("B4").Value = "a" Then
   
    Sheets("List3").Visible = 1
  ElseIf Range("B4").Value = "a" Then
   
    Sheets("List3").Visible = 0
  End If
End Sub

Lůjík
nováček
Příspěvky: 19
Registrován: listopad 13
Pohlaví: Žena
Stav:
Offline

Re: automatické spuštění makra/změnou buňky  Vyřešeno

Příspěvekod Lůjík » 09 lis 2013 17:58

to cmuch - na čtvrtém řádku má být asi "b", ale i tak jste mi strašně moc pomohl!!! Jste nejlepší, bože, já tomu snad ani nemůžu uvěřit!!! Sedím nad tím už asi 3 hodiny a snažím se to najít na internetu a vy to máte takhle strašně rychle... nemám slov!! Děkuju!!! :*


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Automatické přihlašování k fóru.
    od pcmaker » 10 srp 2025 13:24 » v PC-HELP - připomínky k fóru
    1
    2890
    od atari Zobrazit poslední příspěvek
    10 srp 2025 21:20
  • Spuštění PC Příloha(y)
    od Elbeckho » 21 úno 2025 14:27 » v Problémy s hardwarem
    11
    4852
    od Kminek Zobrazit poslední příspěvek
    23 úno 2025 02:14

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 12 hostů