Eli aktiivisen rivin tyhjien solujen perusteella pitäisi piilottaa sarakkeet määritetyltä sarakealueelta. Ja millä koodilla kaikki sarakkeet taas palautetaan takaisin esille?
Sarakkeiden piilottaminen aktiivisen rivin per
3
116
Vastaukset
- ORCL
Ohessa moduuliin kaksi makroa. Muuta kolmella koodirivillä haluamasi sarakeväli. Mallissa tällä hetkellä välinä A- Z. Ensimmäisellä makrolla saa piiloon tyhjien solujen sarakkeet sarakevälillä ja toisella makrolla saa kaikki sarakkeet taas näkyviin. Onko apua ?
Sub PiilotaSarakkeet()
Dim Alue As Range
Dim Solu As Range
Columns("A:Z").Hidden = False 'haluttu sarakeväli tähän
Set Alue = Range("A" & ActiveCell.Row & ":Z" & ActiveCell.Row) 'haluttu sarakeväli tähän
For Each Solu In Alue
If IsEmpty(Solu) Then
Columns(Solu.Column).Hidden = True
End If
Next Solu
End Sub
Sub NäytäSarakkeet()
Columns("A:Z").Hidden = False 'haluttu sarakeväli tähän
End Sub- Koodi_hukassa
Just noin! Kiitos ORCL
ei tarvitse määritellä aluetta...
Sub Piilota()
ActiveCell.EntireRow.SpecialCells(xlCellTypeBlanks).EntireColumn.Hidden = True
End Sub
Sub Näytä()
ActiveCell.EntireRow.SpecialCells(xlCellTypeBlanks).EntireColumn.Hidden = False
End Sub
Keep EXCELing
@Kunde
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Mielessäni vieläkin T
Harmi että siinä kävi niinkuin kävi, rakastin sinua. Toivotan sulle kaikkea hyvää. Toivottavasti löydät sopivan ja hyvän402122Pupuhuhdasta löytyi lähes sadan kilon miljoonalasti huumeita
Pupuhuhdasta löytyi lähes sadan kilon miljoonalasti huumeita – neljä Jyväskylän Outlaws MC:n jäsentä vangittu: "Määrät p471674Persut petti kannattajansa, totaalisesti !
Peraujen fundamentalisteille, vaihtkaa saittia. Muille, näin sen näimme. On helppo luvata kehareille, eikä ne ymmärrä,291501- 321486
Nellietä Emmaa ja Amandaa stressaa
Ukkii minnuu Emmaa ja Amandaa stressaa ihan sikana joten voidaanko me koko kolmikko hypätä ukin kainaloon ja syleilyyn k61441Nähtäiskö ylihuomenna taas siellä missä viimeksikin?
Otetaan ruokaöljyä, banaaneita ja tuorekurkkuja sinne messiin. Tehdään taas sitä meidän salakivaa.11425Sinäkö se olit...
Vai olitko? Jostain kumman syystä katse venyi.. Ajelin sitten miten sattuu ja sanoin ääneen siinä se nyt meni😅😅... Lis21407Housuvaippojen käyttö Suomi vs Ulkomaat
Suomessa housuvaippoja aletaan käyttämään vauvoilla heti, kun ne alkavat ryömiä. Tuntuu, että ulkomailla housuvaippoihin11341Hyvää yötä ja kauniita unia!
Täytyy alkaa taas nukkumaan, että jaksaa taas tämän päivän haasteet. Aikainen tipu madon löytää, vai miten se ärsyttävä21260Lepakot ja lepakkopönttö
Ajattelin tehdä lepakkopöntön. Tietääkö joku ovatko lepakot talvella lepakkopöntössä ´vai jossain muualla nukkumassa ta61229