rivin/sarakkeen lisääminen

kaavalla?

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

4

433

    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. Kuka oli töllöntyön tekijä?

      Ketä on nyt pidätetty? Oliko syy mustasukkaisuus tyttöystävästä tai oliko muita lieventäviä seikkoja? Katuuko tekijä nyt
      Pieksämäki
      50
      5277
    2. Kotikasvatus siitä se lähtee eli missä meni vikaan että lapsesta tuli puukottaja

      Ottakaa muut oppia, normaali kotielämä. Ei liikaa edes hengellisyyttä.
      Pieksämäki
      81
      3084
    3. 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
      310
      1676
    4. 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
      1234
    5. 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
      1217
    6. Jenkkilahkojen kastekaava

      Jenkkilahkojen yhteinen kastekaava on kirjoitettuna Mormonin Kirjaan, Moroni, luku-8 Pienten lapsien vanhempia uhataan
      Kaste
      139
      1134
    7. Leijonat Maailmanmestareita!

      Ihanaa Leijonat, ihanaa!!!
      Maailman menoa
      133
      1116
    8. Pasi Turunen: Ensimmäisenä Helluntaina ei kastettu sylivauvoja!

      Tänään 31.5.2026 Pasi Turunen noin vastasi soittajan kysymykseen! Raamattu EI KERRO ketä kastettiin
      Kaste
      161
      1095
    9. Mitä ajatuksia miehet, jos..?

      Nainen on 40v eikä ole omia lapsia?
      Ikävä
      171
      1074
    10. Se mies rakastaa minua

      Ja minä rakastan häntä. 😌
      Ikävä
      49
      954
    Aihe