Rekisteröidy

Ilmoitukset

Ladataan…

    Näytä kaikki

    Sarakkeiden piilottaminen aktiivisen rivin per

    Eli aktiivisen rivin tyhjien solujen perusteella pitäisi piilottaa sarakkeet määritetyltä sarakealueelta. Ja millä koodilla kaikki sarakkeet taas palautetaan takaisin esille?
    3269
    Äänestä

    Muut lukivat myös

    Vastaukset 3

    Vanhimmat

    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

    Äänestä

    • Just noin! Kiitos ORCL

      Äänestä

    • 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

      Äänestä

    Odottaa vastausta

    Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.

    Luetuimmat keskustelut

    Kommentoi aloitusta

    Koodi_hukassa kirjoitti:

    Eli aktiivisen rivin tyhjien solujen perusteella pitäisi piilottaa sarakkeet määritetyltä sarakealueelta. Ja millä koodilla kaikki sarakkeet taas palautetaan takaisin esille?

    Anonyymi
    5000

    Ilmoita asiaton sisältö

    • Sisältää materiaalia, joka on loukkaavaa, herjaavaa, rasistista, uhkailevaa tai ahdistelevaa.

    • Materiaali sisältää nimiä, yhteystietoja tai muita henkilökohtaisia tietoja. Julkisuuden henkilöistä, julkisissa viroissa toimivista ihmisistä sekä yritysten vastuuhenkilöistä saa keskustella työhön liittyen. Myös yksityiselämään liittyvistä asioista voi keskustella siltä osin, kuin niistä on julkisesti kerrottu.

    • Sisältää lapsille haitallista tai heiltä kiellettyä materiaalia. Seksuaalinen sisältö on sallittua aiheeseen tarkoitetuilla palstoilla, joiden ikäraja on 18 vuotta.

    • Lainvastaista sisältöä voi olla mm. yksityiselämää loukkaavan tiedon levitys, kiihottaminen kansanryhmää vastaan, laiton uhkaaminen, alaikäisiin liittyvä seksuaalinen sisältö/grooming, petokset, identiteettivarkaudet, kunnianloukkaukset ja tekijänoikeusrikkomukset.

    • Sisältö ei liity palstan tai keskusteluketjun aiheeseen.

    • Viesti ei ole suomea tai ruotsia (pl. International Forums), se sisältää mainontaa, se sisältää tekijänoikeuksin suojattua materiaalia, se on massapostitus tai jokin muu syy.

    Jaa keskustelu