< návrat zpět

MS Excel

Téma: CheckBox1 skryt a odokryt stlpce rss

Zaslal/a dialektor 10.11.2014 19:45

Ahojte, potreboval by som poradit ako by som mohol skryt a odokryt stlpce pomocou policka checkBox. napriklad skryt stlpce E,G,Y na fore som jedno makro nasiel ale rozbehal som ho len na posebe iduce stlpce .

Dakujem za pomoc

Zaslat odpověď >
€Ł мσşqμΐτσ(10.11.2014 20:30)#022279
€Ł мσşqμΐτσ
tohle jen tak narychlo
Příloha: zip22279_sesit1.zip (20kB, staženo 37x)
citovat
Stalker(10.11.2014 21:11)#022280
Stalker
Nebo takto:
Private Sub CheckBox1_Click()
If List1.CheckBox1 = True Then
Range("E1,G1,Y1").EntireColumn.Hidden = True
Else
Range("E1,G1,Y1").EntireColumn.Hidden = False
End If
End Sub
citovat
Dingo(10.11.2014 21:18)#022281
avatar
Já taky přidám řešení. (@Mosquito: opravdu nesoupeřím, kdo má lepší řešení 3 )
Už před 1,5 rokem jsem pro sebe dělal to samé! A zjistil jsem, že potřebuju přidávat do listu další sloupce a skrývání tím přestane fungovat.
Proto v příloze je navíc ještě univerzálnější řešení, kde se skrývaný sloupec hledá podle textu.
Příloha: zip22281_skryti-sloupcu.zip (23kB, staženo 44x)
citovat
dialektor(10.11.2014 21:49)#022282
avatar
Dakujem moc za pomoc 1citovat
€Ł мσşqμΐτσ(10.11.2014 22:14)#022284
€Ł мσşqμΐτσ

Dingo napsal/a:

Já taky přidám řešení. (@Mosquito: opravdu nesoupeřím, kdo má lepší řešení )


v poho 5citovat
marjankaj(10.11.2014 22:19)#022285
avatar
Tak aj ja pridám. Požičal som si súbor od Dinga.
Tretí riadok má byť prázdny. Iba vybrané stlpce obsahujú text. V mojom prípade "x".
Příloha: zip22285_moj.zip (16kB, staženo 37x)
citovat
icon eLCHa(11.11.2014 7:44)#022288
eLCHa
Musel bych to vyzobávat ze souboru, takže tohle bylo rychlejší.
Já to dělám takhle:http://youtu.be/O5LyNsFsEgMcitovat

Uživatelské menu

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

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.

On-line nástroje