< návrat zpět

MS Excel


Téma: VBA - skrytí sloupců dle zadaných podmínek rss

Zaslal/a 1.11.2016 13:11

Dobrý den, ve své tabulce bych rád měl výpočet rozmezí sloupců, které potřebuji skrýt
např.:
A1 20
A2 31
V tomto případě tedy potřebuji tedy skrýt a odkrýt sloupce v rozmezí 20-31 (například zaškrtávacím tlačítkem, pravda = skrýt, odškrtnuto = zobrazit)
Děkuji velice za makro.

Zaslat odpověď >

icon #033257
avatar
Makro si nahraj, edituj a uprav. Potrebuješ doňho akurát doplniť hodnotu premenných - rozsah stĺpcov od-do, podľa hodnôt v bunkách A1 a A2. Nepoužívaj skrývanie, ale zoskupovanie stĺpcov. Písať to makro nebudem, je to trivialita.citovat
#033258
avatar
Já už ho napsal, tak posílám...
P.

Např.:
Sub Skryt_rozmezi_sloupcu()

Cells.Columns.Hidden = False
Range(Cells(, Range("A1").Value), Cells(, Range("A2").Value)).Columns.Hidden = True

End Sub
citovat
icon #033262
avatar
Mno, skryté stĺpce skutočne nenávidím, ľahko sa prehliadnu. Lepšie je pmn používať zoskupovanie, ako som zmienil vo svojom úvodnom poste. Ale na to časom prídete sami.citovat
#033264
avatar
Vřelé díky oběma. Mě nevyhovuje v tom jednom konkrétním sešitu zase seskupování sloupců, radši takto, díky.citovat
#033275
avatar
@AL - Já to používám následovně:

Když chci něco skrýt, tak abych o tom věděl "jenom já", tak skryji sloupce. Mám prakticky jistotu, že si toho management vůbec nevšimne, případně to budou ignorovat. Takže skrývám pomocné sloupce, případně hodnoty, které nemají pro vedení žádný smysl.
Když chci, aby měl management možnost si některé hodnoty zobrazit, ale nejsou až tolik důležité, případně zabírají moc místa, tak využívám seskupování sloupců.
P.citovat
icon #033281
avatar
Pavlus - dáva to zmysel, do momentu, kedy sa to neotočí proti Tebe: dostaneš od niekoho iného sheet so skrytými stĺpcami, nevšimneš si to a vzniká potenciálny problém.
Preto u svojich sheetov v podstate vždy dávam prednosť zoskupovaniu pred skrývaním stĺpcov. Ver tomu, že moje dashboardy sú publikované v rámci našej firmy po celom svete., ani jeden užívateľ nenamietol nič proti tomu, že v sheetoch vidí tlačítko expand/collapse. Pokiaľ si niekto z top managerov chce prezrieť, čo sa nachádza v takto "skrytých" stĺpcoch, nevidím dôvod, prečo im v tom brániť.citovat
icon #033282
eLCHa
@AL
v podstatě se dá souhlasit, i když já zase nemám rád seskupování. je tam jedno významné proti a to je zámek. pokud ty dashboardy neukládáš v hodnotách a máš tam vzorce, tak nechtěná změna může nadělat neplechu (pokud si to odemkne, není to nechtěná změna). dá se vyřešit kódem, ale tam zase nevíš, zda to povolí nebo ne. i toto můžeš zabezpečit, že ano, ale to už to kvůli blbině komplikujeme.
skryté sloupce jsou základ a každý manažer o nich ví (prostě neberu, že ne)

tím tě nepřesvědčuji, abys to změnil, protože je to ptákovina ;))

mimochodem, mně se taky neozývají - až pak oklikou zjistíš, že nemají excel, ale libreoffice a něco jim nefunguje ;))citovat
icon #033297
avatar
Karle, skryté sloupce jsou základ a každý manažer o nich ví (prostě neberu, že ne).
No práve, takže si ich dokáže zobraziť, keď bude chcieť, čiže snaha o "utajenie" vyjde i tak vnivoč. Na druhej strane, mne sa stalo v minulosti niekoľkokrát, že som skryté stĺpce neodhalil a potom som sa s tým následne trápil. Mám rád čisté riešenia - pokiaľ sa má jednať o medzivýpočty a pod., tak kľudne zoskupiť - na sheete ich vidieť nemusím, ale hneď pri zhliadnutí sheetu viem, že nejaké pomocné stĺpce (napríklad) sú "skryté". Inak, o manageroch máš asi pomerne vysokú mienku, za svoju kariéru som zažil spústu "managerov", znalosti excelu ktorých stáli za starú bačkoru. V súčasnej práci si ale na ľudí nad sebou sťažovať fakt nemôžem, pokiaľ nevedia (nikto nevie všetko), tak zo mňa aspoň nerobia blbca. Mať nad sebou dobrých šéfov chce ale hromadu šťastia :) Spomínam si na šéfa z minulej práce, ktorý nebol schopný pomaly si vytvoriť ani blbú kontingenčku, žiadne výpočtové polia, obyčajnú kontingenčku a po mne sa chcel voziť za to, že som mu v súbore, ktorý si nemožne nadesignoval, neukotvil na nejakom sheete priečky. Keď som namietal, že ten jeden click myšou mu trvá rovnakú dobu ako mne, tak sa rozčuľoval, že to tam malo byť a on je manager. K...t! Než niečo vypotil, trvalo to večnosť, takže v práci "pracoval" od nevidím do nevidím a nechápal, že ja si po tom, čo si svoje urobím, dovolím odísť domov. Našťastie, táto moja životná etapa je už minulosťou :). Pokiaľ niekto trávi čas činnosťou, ktorú iný zvládne za zlomok času, tak je to dôkaz neschopnosti prvo menovaného a mal by za to byť trestaný. Bohužiaľ, na daných ľudí, naprosto neschopných pracovať efektívne, sa často nazerá ako na nesmierne pracovitých. To je psycho, já bych blil, velebnosti :)citovat
icon #033305
eLCHa
@AL
pokud chci něco utajit, tak to tam nedávám. To je jediné řešení ;))
pokud posílám data (ne funkční sešit), tak vždy v hodnotách - pokud nejsem vysloveně požádán, že tam mají být vzorce.

Šéfové jsou proměnná veličina (někdy naštěstí, někdy bohužel). Zatím jsem měl vždy štěstí, že se mne žádný nesnažil přesvědčit, že je v excelu lepší než já a věděl, že je to naopak.

ale to jsme OTcitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09