Napadla mě taková blbost. Co kdyby se to řešilo podmíněným formátováním pomocí vzorce. Pokud je splněna podmínka tak barva písma bude barva pozadí.
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Tipy a triky pro Excel a makra VBA
< návrat zpět
Téma: skrytí vybraných řádků na základě podmínky
MS Excel
Téma: skrytí vybraných řádků na základě podmínky 
Zaslal/a adosl 2.2.2014 0:59
Ahoj můžete mi prosím pomoct s makrem, které by sledovalo tři konkrétní buňky např A10:A12 a při změně v nich by se spustilo.
Makro bude skrývat buť řádek 10 nebo 11 nebo 12 na základě toho která z buněk A10:A12 bude prázdná. Pokud bude A10 něco obsahovat bude 10 řádek vidět a tak analogicky u všech tří.
Všem moc děkuji za pomoc.
Ještě jedna otázka nazávěr. Šlo by udělat, aby to makro pracovalo asi na 20-30 listech. Jde nějak hromadně určit pro které listy má to makro platit i s tou automatickou kontrolou změn v buňkách?
Je tu spousta odborníků a já jsem VBA lama tak prosím o radu. 
Jak píše eLCHa.
@ladaakk
další z možných řešení
Spuštění makra pokud se změní hodnota buňky v které je vzorec.
Do modulu listu vlozit
Dim puvodnihodnota As String
Private Sub Worksheet_Change(ByVal Target As Range)
If Not puvodnihodnota = Range("A1").Value Then
Call makro
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
puvodnihodnota = Range("A1").Value
End Sub
Pokud je vzorec v A1 a jeho hodnota se změní tak se zavolá makro.
@ladaakk
další z možných řešení
Spuštění makra pokud se změní hodnota buňky v které je vzorec.
Do modulu listu vlozit
Dim puvodnihodnota As String
Private Sub Worksheet_Change(ByVal Target As Range)
If Not puvodnihodnota = Range("A1").Value Then
Call makro
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
puvodnihodnota = Range("A1").Value
End Sub
Pokud je vzorec v A1 a jeho hodnota se změní tak se zavolá makro.
změnit barvu písma na bílou nepotřebuji, protože v těch buňkách co chci skrýt jsou vzorce a když se to má skrýt, tak jsou buňky prázdné. Skrýt to potřebuji proto, že pod tím pokračují další buňky, které potřebuji přirazit k těm, co jsou nad tím plné a proto ty 3 prázdné řádky chci skrýt.
Vložím ještě jednou můj soubor a prosím, zda mi s tím uděláte něco, aby fungovalo, když zadám na listu vzorce do pole b1 hodnotu 1 až 3 tak na listu 1 se mi ukáže 1 až 3. pokud zadám cokoliv jiného neobjeví se nic. Já potřebuji, aby se řádek 1 až 3 skryl v případě, že je buňka v prvním sloupci prázdná. Pokud je prázdná A3 skryje se řádek 3 pokud A3 a A2 tak ty dva a pokud jsou prázdné všechny tak se skryjí všechny 3.
Prosím ponechte procedůru Skryj v modulu 1.
Vložím ještě jednou můj soubor a prosím, zda mi s tím uděláte něco, aby fungovalo, když zadám na listu vzorce do pole b1 hodnotu 1 až 3 tak na listu 1 se mi ukáže 1 až 3. pokud zadám cokoliv jiného neobjeví se nic. Já potřebuji, aby se řádek 1 až 3 skryl v případě, že je buňka v prvním sloupci prázdná. Pokud je prázdná A3 skryje se řádek 3 pokud A3 a A2 tak ty dva a pokud jsou prázdné všechny tak se skryjí všechny 3.
Prosím ponechte procedůru Skryj v modulu 1.
Příloha: 
17717_pokus.zip (14kB, staženo 41x)
17717_pokus.zip (14kB, staženo 41x)
@ladaakk
Napadla mě taková blbost. Co kdyby se to řešilo podmíněným formátováním pomocí vzorce. Pokud je splněna podmínka tak barva písma bude barva pozadí.
Škoda, že není středověk. Za tohle bych vás z radostí nechal upálit. ;))
@cmuch
@ladaakk
další z možných řešení
A vám bych k tomu ještě přidal doživotní žalář. Sice by to nebyl velký rozdíl, ale třeba by to někoho odradilo. ;))
Fujtajxl
Napadla mě taková blbost. Co kdyby se to řešilo podmíněným formátováním pomocí vzorce. Pokud je splněna podmínka tak barva písma bude barva pozadí.
Škoda, že není středověk. Za tohle bych vás z radostí nechal upálit. ;))
@cmuch
@ladaakk
další z možných řešení
A vám bych k tomu ještě přidal doživotní žalář. Sice by to nebyl velký rozdíl, ale třeba by to někoho odradilo. ;))
Fujtajxl
@adosl
Rád bych vám pomohl, ale nejsem si jistý, jestli si tu pomoc zasloužíte. Tato příloha už tu byla, nejsem slepý. Jenže vy mluvíte celou dobu o listu vzorec a několika listech kterých se to týká a dalších listech, kterých se to netýká. A pak vložíte tohle.
Prosím, važte si našeho času a připravte tu přílohu pořádně, pak vám někdo odpoví - já už to nebudu.
Rád bych vám pomohl, ale nejsem si jistý, jestli si tu pomoc zasloužíte. Tato příloha už tu byla, nejsem slepý. Jenže vy mluvíte celou dobu o listu vzorec a několika listech kterých se to týká a dalších listech, kterých se to netýká. A pak vložíte tohle.
Prosím, važte si našeho času a připravte tu přílohu pořádně, pak vám někdo odpoví - já už to nebudu.
eLCHove slová by sa mali tesať do kameňa.
Prestávam rozumieť neutúchajúcej ochote niektorých riešiteľov chápať a pomáhať s riešením naprosto chaotických zadaní. Už nejakú dobu, pokiaľ zadanie nie som schopný rozkľúčovať kvôli jeho zmätenosti, tak je to pre mňa dostatočný dôvod, aby som sa o riešenie vôbec nepokúšal.
Prestávam rozumieť neutúchajúcej ochote niektorých riešiteľov chápať a pomáhať s riešením naprosto chaotických zadaní. Už nejakú dobu, pokiaľ zadanie nie som schopný rozkľúčovať kvôli jeho zmätenosti, tak je to pre mňa dostatočný dôvod, aby som sa o riešenie vôbec nepokúšal.
@eLCHa
nevím za co bych měl dostat žalář.
Jak by jste to řešil bez maker?
Spousty uživatelů excelu ho ani pořádně neumí používat, jednoduché věci řeší složitě a spoustu se jich to ani nechce naučit...
Pokud něco nechci vidět tak mám spousty možností, ale nechal bych to na uživateli jakou cestou se vydá.
Ale to jsem odbočil.
@AL
Když prolezete své příspěvky tak některým zadáním jste porozuměl lépe než někdo jiný a někdy zase naopak.
Je to jenom o tom se správně vyjádřit.
Co vás napadne když vám někdo řekne "milisekundy" a nevíte hned jaké i/y tam myslí?
Já myslím že dvě věci.
nevím za co bych měl dostat žalář.
Jak by jste to řešil bez maker?
Spousty uživatelů excelu ho ani pořádně neumí používat, jednoduché věci řeší složitě a spoustu se jich to ani nechce naučit...
Pokud něco nechci vidět tak mám spousty možností, ale nechal bych to na uživateli jakou cestou se vydá.
Ale to jsem odbočil.
@AL
Když prolezete své příspěvky tak některým zadáním jste porozuměl lépe než někdo jiný a někdy zase naopak.
Je to jenom o tom se správně vyjádřit.
Co vás napadne když vám někdo řekne "milisekundy" a nevíte hned jaké i/y tam myslí?
Já myslím že dvě věci.
Pro tazatele.
To skrytí řádků je tam potřeba aby nebyly vidět kdy.
Když je aktivní list a nebo hned co se změní hodnota na listu Vzorce?
To skrytí řádků je tam potřeba aby nebyly vidět kdy.
Když je aktivní list a nebo hned co se změní hodnota na listu Vzorce?
@cmuch
Odbočím s vámi ;)
Protože vás považuji za šikovného v excelu a proto očekávám, že nebudete používat takové prasečiny, jako obarvování textu barvou pozadí, když zcela jistě znáte vlastní formát ";;;" ;))
Zkuste si nastavit bílý text a pak stránku vytisknout černobíle nebo si zkuste bílý text prostě jen označit, atd atd.
Odbočím s vámi ;)
Protože vás považuji za šikovného v excelu a proto očekávám, že nebudete používat takové prasečiny, jako obarvování textu barvou pozadí, když zcela jistě znáte vlastní formát ";;;" ;))
Zkuste si nastavit bílý text a pak stránku vytisknout černobíle nebo si zkuste bílý text prostě jen označit, atd atd.
@cmuch
Dovolím si odpovědět. Protože to poslední řešení je prasečina, Vás nehodna, a navíc nefunguje.
Mám pocit, že adosl opravdu netuší, ale snaží se, a tak místo aby popsal jeho skutečný problém, včetně připraveného sešitu, zredukoval dotaz na zástupný problém - nefunguje makro. A pak, když někdo navrhne řešení, vyjde najevo, že tak ne, protože ... (a další kousek)
Současně se naráží na vlastní terminologii
- prázdná buňka - podle adosl buňka, ve které není nic vidět? Ale když obsahuje vzorec, tak prázdná není.
- změna buňky - změna není změna hodnoty vzorce, i když adosl si možná myslel opak.
Po dlouhé komunikaci je zdá se nevyjasněna snad poslední otázka - jak se pozná, ve kterém listu se mají skrývat řádky. Informace že jsou to některé a ty se moho měnit je podle adosl asi nepodstatná.
Pak jsou tu možná skryté zádrhele. Možná něco podsouvám, ale na skryté řádky mají navazovat další vzorce. Doufám jen, že si někdo nemyslí, že když řádky skryje, tak automaticky zmizí z výpočtů i hodnoty.
Dovolím si odpovědět. Protože to poslední řešení je prasečina, Vás nehodna, a navíc nefunguje.
Mám pocit, že adosl opravdu netuší, ale snaží se, a tak místo aby popsal jeho skutečný problém, včetně připraveného sešitu, zredukoval dotaz na zástupný problém - nefunguje makro. A pak, když někdo navrhne řešení, vyjde najevo, že tak ne, protože ... (a další kousek)
Současně se naráží na vlastní terminologii
- prázdná buňka - podle adosl buňka, ve které není nic vidět? Ale když obsahuje vzorec, tak prázdná není.
- změna buňky - změna není změna hodnoty vzorce, i když adosl si možná myslel opak.
Po dlouhé komunikaci je zdá se nevyjasněna snad poslední otázka - jak se pozná, ve kterém listu se mají skrývat řádky. Informace že jsou to některé a ty se moho měnit je podle adosl asi nepodstatná.
Pak jsou tu možná skryté zádrhele. Možná něco podsouvám, ale na skryté řádky mají navazovat další vzorce. Doufám jen, že si někdo nemyslí, že když řádky skryje, tak automaticky zmizí z výpočtů i hodnoty.
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