MS Excel

Téma: Skryt - odkryt riadky

Zaslal/a frantilopa 28.2.2013 11:29

Prosim viete mi pradit.
porebujem tlacitkom schovat a odkryt riadky (urobil som to takto):

'schovať bunky - odkryť bunky (riadky)(12:23)
Range("12:23").EntireRow.Hidden = Not Range("12:23").EntireRow.Hidden

Ale jednim stlacenim potrebujem schovat viac riakov (oblasti) na raz:
12:23 a 25:31 a 33:40

ked som to urobil takto:
Range("12:23").EntireRow.Hidden = Not Range("12:23").EntireRow.Hidden
Range("25:31").EntireRow.Hidden = Not Range("25:31").EntireRow.Hidden
Range("33:40").EntireRow.Hidden = Not Range("33:40").EntireRow.Hidden

tak to robi postupne...
Ako sa to da aby to spravilo naraz.
Dakujem.

Zaslat odpověď >

Pavlus(28.2.2013 11:41)#011923

A je podstatné udělat to naráz?
Myslím tím, jestli to má nějaký smysl. Pokud jde pouze o to, aby to "nerušilo" uživatele, tak by stačilo pouze před vykonáním příkazů zamezit překreslování obrazovky a po nich překreslování opět povolit.
P.

Př.:
'Zamezí překreslování obrazovky:
Application.ScreenUpdating = False

'Povolí překreslování obrazovky:
Application.ScreenUpdating = Truecitovat

AL(28.2.2013 12:11)#011925

Stačí riešenie od Pavlusa. Ničmenej, pokiaľ to chceš naozaj naraz, tak miesto 3 pôvodných inštrukcií zapíš:
Range("12:23,25:31,33:40").EntireRow.Hidden = Not Range("12:23,25:31,33:40").EntireRow.Hiddencitovat

Uživatelské menu

Nejste přihlášen(a)

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.