MS Excel

Téma: Skrytí sloupců

Zaslal/a Niffki 9.8.2010 18:14

Tak jsem tu zas.

Napadla mi taková myšlenka. Půjdou skrýt všechny sloupce pokud nejsou vybrány?

Tedy mám vybrány třeba sloupce D,E,F a chtěl bych pomocí makra aby se skryli všechny sloupce, které nemám vybrána.

Třeba chci zobrazit jen údaje v sloupci D, E, F a co je v ostatních sloupcích mě nezajímá.

Co vy na to? Já to zkouším za zatím bez výsledku.

Zaslat odpověď >

Začátečník(9.8.2010 20:23)citovat#002133

Jak prosté:

Cells.EntireColumn.Hidden = True
Columns("D:F").EntireColumn.Hidden = False

Niffki(10.8.2010 6:03)citovat#002134

Jj Ok.

Ale co když budu mít pokaždé vybrány jiné sloupce?

Nemám pevně dané sloupce, které chci mít zobrazeny.

Prostě označím sloupce. Zmáčknu čudl a neoznačené sloupce se skryjí.

Poki(10.8.2010 9:18)citovat#002137

a takhle: Cells.EntireColumn.Hidden = True
Range(Selection.Address).EntireColumn.Hidden = False

Niffki(18.8.2010 10:03)citovat#002218

Mám tento kod

Sub Makro1()

Cells.EntireColumn.Hidden = False

Cells.EntireRow.Hidden = False

If Range("B100") = "1" Then

Cells.EntireColumn.Hidden = True

Columns("D:F").EntireColumn.Hidden = False

Cells.EntireRow.Hidden = True

Rows("1:2").EntireRow.Hidden = False

Else

MsgBox "Nic se nestalo"

End If

End Sub

Ale nefunguje mi. Prosím kde mám chybu. Skryjí se mi všechny sloupce i řádky ale už se mi nezobrazí ty, které si navolím.

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.