rivin/sarakkeen lisääminen

kaavalla?

Onkohan olemassa kaavaa, joka lisäisi rivin tai sarakkeen automaattisesti jos määrättyyn soluun tulee tietty arvo?

4

296

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • MattiJuh

      Olisiko tähän kysymykseen kenelläkään vastausta, asia myös minulla ajankohtainen?

      • Eevalena

        Onko liian haasteellinne pähkinä? Minäkin yrittänyt opinnäytetyötni varten
        ratkaisua etsiä, mutta ei ole löytynyt! Nimenomaan ko. solun alapuolelle t uo lisärvi pitäisi saada? Voiko kukaan ystävllisesti auttaa?


    • tosi haasteellinen ;-)

      ko taulukon moduuliin...
      tsekkaa nyt solua B5 ja sen arvoa 1, muuta solu ja arvot sopivaksi
      koodissa hipsattuna myös rivin yläpuolelle lisäys sekä sarakkeiden lisäys vasemmalle ja oikealle.. Hipsuja muuttelemalla toimii siis joka suuntaan

      Private Sub Worksheet_Change(ByVal Target As Range)
      On Error GoTo Virhe
      Application.EnableEvents = False
      If Not Intersect(Target, Range("B5")) Is Nothing Then
      If Target = 1 Then
      'lisää rivin yläpuolelle
      ' Target.EntireRow.Insert
      ' 'lisää rivin alapuolelle
      Target.Offset(1).EntireRow.Insert
      'lisää sarakkeen vasemmalle
      ' Target.EntireColumn.Insert
      ' 'lisää sarakkeen oikealle
      ' Target.EntireColumn.Offset(0, 1).Insert

      End If
      End If
      Virhe:
      Application.EnableEvents = True
      End Sub


      Keep EXCELing
      @Kunde

    • 16+1

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

    Luetuimmat keskustelut

    1. Mikä on kaivattusi etunimi?

      Otsikossa siis on kysymys eriteltynä. Vain oikeat vastaukset hyväksytään.
      Ikävä
      130
      2425
    2. En kestä katsoa

      Sitä miten sinusta on muut kiinnostuneita. Olen kateellinen. Siksi pitäisi lähteä pois
      Ikävä
      109
      1454
    3. Anna minulle anteeksi

      Anna minulle anteeksi. Minä pyydän.
      Ikävä
      134
      1239
    4. Peräti 95 % persujen kannattajista rasisteja

      Kertoo EVA:n teettämä kysely. Pakollista yhdenvertaisuuskoulutusta tarvitsee siis paljon laajempi joukko kuin pelkästää
      Maailman menoa
      341
      1189
    5. Kun viimeksi kohtasitte/näitte

      Mitä olitte tekemässä? Millainen ympäristö oli? Löydetään toisemme...
      Ikävä
      104
      1117
    6. Olet kyllä vaarallisen himokas

      Luova, kaunis, määrätietoinen, pervo, mielenkiintoinen, kovanaama, naisellinen ja erikoinen.
      Ikävä
      99
      1025
    7. On minulla suunitelma

      Siitä ei vain tiedä kukaan muu kuin tällä hetkellä minä. Suunnitelma ja varasuunnitelma. Sinun takiasi nainen. Vain s
      Ikävä
      46
      729
    8. Palstan ylivoimaisesti suosituin keskustelunaihe

      Palstan suosituin keskustelunaihe näyttää olevan homoseksuaalisuus. Otsikoiden perusteella voisi kuvitella olevansa Seks
      Luterilaisuus
      252
      719
    9. Ei koskaan saatu tuntea

      Mitä olisi ollut painautua toisiimme vasten. Hengittää syvään, hyväillä ja rakastella vailla kiirettä. Tai repiä vaattee
      Ikävä
      33
      710
    10. 50
      684
    Aihe