Solujen / rivien piilottaminen kaavoilla

kuinka?

Onnistuuko tehdä sellainen kaava että jos taulukossa 1 jossakin solussa on TOSI, niin taulukossa 2 piiloutuu tai poistuu kokonaan jokin solu tai koko rivi?

3

614

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • muuttele alueita sopivaksi

      taulukon moduuliin

      Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      HaeJaPiilota
      End Sub

      moduuliin...

      Function HaeJaPiilota()
      Dim solu As Range
      With Sheets("Sheet1").Cells
      Set solu = .Find( _
      What:=True, _
      LookIn:=xlValues, _
      LookAt:=xlWhole, _
      SearchOrder:=xlByRows, _
      SearchDirection:=xlNext, _
      MatchCase:=False, _
      SearchFormat:=False)
      End With


      If Not solu Is Nothing Then
      Sheets("Sheet2").Columns("F:G").EntireColumn.Hidden = True
      Else
      Sheets("Sheet2").Columns("F:G").EntireColumn.Hidden = False
      End If

      End Function

      • eikös tuossa

        kysytty
        Onnistuuko tehdä sellainen kaava että jos taulukossa 1 jossakin solussa on TOSI, niin taulukossa 2 piiloutuu tai poistuu kokonaan jokin solu tai koko rivi?

        Mites tämä noilla onnistuu ?


      • eikös tuossa kirjoitti:

        kysytty
        Onnistuuko tehdä sellainen kaava että jos taulukossa 1 jossakin solussa on TOSI, niin taulukossa 2 piiloutuu tai poistuu kokonaan jokin solu tai koko rivi?

        Mites tämä noilla onnistuu ?

        ei voi tehdä pelkillä kaavoilla, joten on käytettävä koodia...
        koodi toimii siten, että kun taulukko1:ssä joku tieto muuttuu tarkistetaan löytyykö TRUE. Jos löytyi piilotetaan sarakkeet, muuten poistetaan piilotus.
        pikkumuutoksilla voi esim. tyhjentää solujen arvot


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Vihamielisyys naisia kohtaan on jo yllättävän suuri ongelma

      Esiintyy laajemmassa mittakaavassa, mitä vain tällä palstalla. Mistä tuo ilmiö nyt oikein johtuu, ja saa alkuvoimansa?
      Sinkut
      324
      1856
    2. Olen melko vakuuttunut

      etten tule olemaan koskaan täysin onnellinen ilman sinua. En uskonut, että näin kävisi kenenkään kanssa. Kunnes sain kok
      Ikävä
      83
      1297
    3. Odotan sitä hetkeä

      kun nähdään taas. Tiedän, että sinäkin odotat. Kun se päivä koittaa, katseesi hakee minua. Ehkä arkailemme toisiamme väh
      Ikävä
      75
      1294
    4. Leijonat Maailmanmestareita!

      Ihanaa Leijonat, ihanaa!!!
      Maailman menoa
      134
      1167
    5. Muistatko kaivattusi

      Syntymäpäivän? Päivämäärä riittää. 🌹
      Ikävä
      81
      986
    6. Minkälaisessa asennossa

      Haluaisit kaivattusi kanssa olla?
      Ikävä
      90
      904
    7. Sinä siellä lähistöllä

      Tahtoisin tutustua paremmin 💫
      Ikävä
      48
      853
    8. Postimerkki kirjeeseen ja kortiin maksaa jo 3 euroa!

      https://yle.fi/a/74-20229241 Kyllä tämä on järjetön hinta, Posti tuhoaa itsensä tällä hinnalla, täytyyhän Postin "Herro
      Maailman menoa
      118
      824
    9. Mulla on ikävä

      sua nainen ja niitä katseita ❤️ Lupaatko, että katseemme kohtaa taas?
      Ikävä
      48
      790
    10. Sitä saattaa vähän hölmöillä

      rakkauspäissään, jos tunteita on enemmän kuin osaa käsitellä. Alkuhölmöilyt on söpöä ja sallittavaa.
      Ikävä
      60
      746
    Aihe