Excel - spuštění požadovaného makra při změně hodnoty buněk

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

Moderátor: Mods_senior

Dominik556
nováček
Příspěvky: 2
Registrován: leden 18
Pohlaví: Muž
Stav:
Offline

Excel - spuštění požadovaného makra při změně hodnoty buněk

Příspěvekod Dominik556 » 29 led 2018 10:30

Zdravím ve spolek,

po přečtení několika návodů už vím, že lze požadované makro spustit pomocí změny hodnoty buňky. Používám událostní proceduru:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Cll As Range
Set Cll = Intersect(Target, Range("A1:A3"))
If Cll Is Nothing Then Exit Sub
Call nazev_makra
End Sub

Chtěl bych se zeptat zda lze, případně jak, upravit událostní proceduru tak, aby se spuštěla požadované makra v závislosti změn různých buněk.
Např.: když se změní buňky A1:A3 - spustí se makro_1, při změně buněk B1:B3 se spustí makro_2, při změně buněk C1:C3 se spustí makro_3, atd.

Předem děkuji za odpověď.

Reklama
guest
Pohlaví: Nespecifikováno

Re: Excel - spuštění požadovaného makra při změně hodnoty buněk

Příspěvekod guest » 29 led 2018 12:28

No zkrátka to, co tam testujete s jednou oblastí, zopakujete i pro ostatní.

Dominik556
nováček
Příspěvky: 2
Registrován: leden 18
Pohlaví: Muž
Stav:
Offline

Re: Excel - spuštění požadovaného makra při změně hodnoty buněk

Příspěvekod Dominik556 » 29 led 2018 15:59

Chápu, ale jak to mám zapsat? :)

Uživatelský avatar
elninoslov
Level 2.5
Level 2.5
Příspěvky: 366
Registrován: červen 13
Pohlaví: Muž
Stav:
Offline

Re: Excel - spuštění požadovaného makra při změně hodnoty buněk

Příspěvekod elninoslov » 29 led 2018 23:47

čistý tip bez skúšky ...

Kód: Vybrat vše

Private Sub Worksheet_Change(ByVal Target As Range)
if Not Intersect(Target, Range("A1:A3")) Is Nothing then Call nazev_makra_1
if Not Intersect(Target, Range("B1:B3")) Is Nothing then Call nazev_makra_2
if Not Intersect(Target, Range("C1:C3")) Is Nothing then Call nazev_makra_3
End Sub

Ale nemôžete to takto rozširovať večne, bude to pomalé. Skôr treba prehodnotiť, čo chcete vôbec konkrétne robiť, akú oblasť kontrolovať, akú náväznosť majú na dané oblasti makrá, a hlavne či sa nedá použiť jedno parametrizované makro na všetky oblasti.
atď...


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • excel-posun makra
    od actionboy » 12 bře 2024 18:59 » v Kancelářské balíky
    1
    266
    od Grimm Zobrazit poslední příspěvek
    12 bře 2024 21:43
  • Aktivace Windows po změně disku Příloha(y)
    od JanC » 15 říj 2023 20:32 » v Windows 11, 10, 8...
    24
    3984
    od JanC Zobrazit poslední příspěvek
    08 lis 2023 08:19
  • Problém s připojením na wifi síť při změně PC Příloha(y)
    od Baader » 09 srp 2023 10:38 » v Sítě - hardware
    18
    3028
    od Baader Zobrazit poslední příspěvek
    10 srp 2023 14:16
  • PowerPoint osekává zvuk při změně snímku
    od Venus » 12 úno 2024 16:35 » v Kancelářské balíky
    2
    1126
    od Venus Zobrazit poslední příspěvek
    13 úno 2024 16:57
  • Tisk z excelu mění výšky buněk
    od Moonddur » 28 dub 2023 11:50 » v Kancelářské balíky
    1
    1657
    od atari Zobrazit poslední příspěvek
    28 dub 2023 12:08

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

Kdo je online

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