rivin/sarakkeen lisääminen

kaavalla?

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

4

383

    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. Laitetaas nyt kirjaimet tänne

      kuka kaipaa ja ketä ?
      Ikävä
      93
      8088
    2. Pieni häivähdys sinusta

      Olet niin totinen
      Ikävä
      40
      3882
    3. Lähetä terveisesi kaipaamallesi henkilölle

      Vauva-palstalta tuttua kaipaamista uudessa ympäristössä. Kaipuu jatkukoon 💘
      Ikävä
      102
      1906
    4. Missä olet ollut tänään kaivattuni?

      Ikävä sai yliotteen ❤️ En nähnyt sua tänään söpö mies
      Ikävä
      24
      1360
    5. Taas ryssittiin oikein kunnolla

      r….ä hyökkäsi Viroon sikaili taas ajattelematta yhtään mitään https://www.is.fi/ulkomaat/art-2000011347289.html
      NATO
      32
      1193
    6. Valtimon Haapajärvellä paatti mäni nurin

      Ikävä onnettomuus Haapajärvellä. Vene hörpppi vettä matkalla saaren. Veneessä ol 5 henkilöä, kolme uiskenteli rantaan,
      Nurmes
      31
      1099
    7. Vanha Suola janottaa Iivarilla

      Vanha suola janottaa Siikalatvan kunnanjohtaja Pekka Iivaria. Mies kiertää Kemijärven kyläjuhlia ja kulttuuritapahtumia
      Kemijärvi
      11
      925
    8. Rakastuminenhan on psykoosi

      Ei ihme että olen täysin vailla järkeä sen asian suhteen. Eipä olis aikoinaan arvannut, että tossa se tyyppi menee, jonk
      Ikävä
      53
      847
    9. Olisinko mä voinut käsittää sut väärin

      Nyt mä kelaan päässäni kaikkea meidän välillä tapahtunutta. Jos mä sit kuitenkin tulkitsin sut väärin? Se, miten sä käyt
      Ikävä
      31
      822
    10. Känniläiset veneessä?

      Siinä taas päästiin näyttämään miten tyhmiä känniläiset on. Heh heh "Kaikki osalliset ovat täysi-ikäisiä ja alkoholin v
      Nurmes
      29
      787
    Aihe