Usean tyhjän rivin lisäys arvon vaihtuessa?

Tuskastunut_4

Moi

Kuinkahan pystyy isoon taulukkoon automatisoida esim. 5:n tyhjän rivin lisäyksen arvon vaihtuessa. Eli esim:

Heinonen
Heinonen
Leinonen
Leinonen

Eli nimien väliin 5 tyhjää riviä, kuinkahan onnistuu?

1

122

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • moduuliin...
      nyt lisää 5 riviä sarakkeen G nimien muuttuessa, muuta sopivaksi

      Sub lisääRivit()
      Range("G1").Select
      Do Until ActiveCell = ""
      If ActiveCell.Offset(1, 0) = "" Then Exit Sub
      If ActiveCell = ActiveCell.Offset(1, 0) Then
      ActiveCell.Offset(1, 0).Select
      Else
      Rows(ActiveCell.Row 1 & ":" & ActiveCell.Row 5).Insert
      ActiveCell.Offset(6, 0).Select
      End If
      Loop
      End Sub

      Keep EXCELing
      @Kunde

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

    Luetuimmat keskustelut

    1. 4 kuoli kolarissa

      Kenen vastuulla tienhoito? Sohjoa ja vettä tie täynnä. Oliko säästetty tienhoidossa? Järkyttävä onnettomuus.
      Joensuu
      181
      7614
    2. Suomea odottaa karu kohtalo

      Mitäs menitte uhkailemaan ja leikkimään kovaa. Ei mitään mahdollisuuksia Venäjää vastaan.
      Maailman menoa
      266
      1854
    3. Kerro mistä alkaen

      Se ihastuminen alkoi? Mikä vuosi?
      Ikävä
      68
      1299
    4. Mikä on lempikuvasi

      Kaivatustasi?
      Ikävä
      72
      1223
    5. Nainen, moraali on koetuksella sun kanssa

      Koen nyt olevani rappiolla ja kyllä, omaa syytäni ja itsekontrollin puutetta, mutta olethan kyllä puoleensavetävä, ettei
      Ikävä
      64
      1197
    6. Kuka on oikein

      Kaivattusi?
      Ikävä
      57
      1188
    7. Bachelor-Joonas tapasi Monican isän - "Appiukko" antoi koulutusta vävypojalle - Katso kuvat tästä!

      Joonas ja Monica ovat pitäneet yhtä Bachelor Suomi -kuvausten jälkeen. Tämä todistaa, että tosi-tv:ssä voi syntyä rakkau
      Suomalaiset julkkikset
      7
      1124
    8. Tosiaankin, jos julkaisette täällä henkilötietoja

      Minkäänlaisia, se on poliisiasia. VPN, proxy- tai julkinen yhteys ei salaa mitään. Poliisi pystyy jäljittämään ja saamaa
      Ikävä
      93
      1112
    9. Gallup: Mitä mieltä olet uudesta Putous-kaudesta: hyvä, keskinkertainen, huono?

      Putous on saanut kuraa niskaan mm. kaksimielisistä jutuista. Ohjelma on lasten suosikki ja lapset toistelevat hokemia ti
      Tv-sarjat
      51
      1095
    10. Olet upea nainen

      Upea nainen oot.
      Ikävä
      36
      1046
    Aihe