Rivin lisääminen kun päiväys vaihtuu

tietoa_haluava

Olisi hakusessa makro joka lisäisi rivin aina kun päiväys vaihtuu, Taulukossa on on reilu tuhat riviä, joissa tietoa samalla päivällä voi olla yhdestä kymmeneen riviä. Haluaisin makron joka lisäisi rivin aina kun päiväys vaihtuu.

6

263

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Sub Tsekkaapäiväykset()
      Dim vika As Long
      vika = Range("A65536").End(xlUp).Row
      For i = vika To 2 Step -1
      '¨muuta sarake oikeaksi 1= A-sarake, 2=B-sarake jne.
      If Cells(i - 1, 1).Value <> Cells(i, 1).Value Then
      Cells(i, 1).Insert
      End If
      Next i
      End Sub

      Keep EXCELing
      @Kunde

      • tietoa_haluava

        Mitä pitäisi muuttaa, että lisäisi koko rivin, kun nyt siirtää sarakkeeen soluja alaspäin


      • enoosaavba

      • enosaavba

      • Juuri noin, kuten enosaavba kirjoittaa...

        Sub Tsekkaapäiväykset()
        Dim vika As Long
        vika = Range("A65536").End(xlUp).Row
        For i = vika To 2 Step -1
        '¨muuta sarake oikeaksi 1= A-sarake, 2=B-sarake jne.
        If Cells(i - 1, 1).Value <> Cells(i, 1).Value Then
        Cells(i, 1).EntireRow.Insert
        'Cells(i, 1).Insert
        End If
        Next i
        End Sub

        Keep EXCELing
        @Kunde


    • tietoa_haluava

      Kiitos!
      Hienosti toimii

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

    Luetuimmat keskustelut

    1. Orpo: Seuraavalla hallituksella ei ole yhtään enempää rahaa

      Valtiovarainministeriön virka-arvion mukaan julkisen talouden sopeutuksen tarve on noin kymmenen miljardia euroa ensi va
      Maailman menoa
      318
      4621
    2. Suomen kieli hiipuu vähitellen Vantaalla

      nykytahdilla jo joka kolmas vantaalainen on vieraskielinen 2030-luvun alussa. Maahanmuutto, suomalaisten alhainen synty
      Maailman menoa
      122
      4113
    3. Kun puolustusvoimat on huolissaan nuorison huonosta kunnosta

      ajatellen varusmiespalvelusta(kun moni joutuu keskeyttään), niin johan tuli joku yliopiston vasemmistonainen selittään,
      Maailman menoa
      210
      2492
    4. Jos vedetään mutkat suoraksi?

      Niin kumpaan ryhmään kuulut? A) Niihin, jotka menevät edellä ja tekevät? Vai B) Niihin, jotka kulkevat perässä ja ar
      Sinkut
      101
      2179
    5. Vain vasemmistolaiset ovat aitoja suomalaisia

      Esimerkiksi persut ovat ulkomaalaisen pääomasijoittajan edunvalvojia, eivät auta köyhiä suomalaisia.
      Maailman menoa
      38
      1726
    6. Miten must tuntuu

      et sä ajattelet mua just nyt
      Ikävä
      31
      1346
    7. Tiesitkö? Kohutun L/over sarjan Juha eli Jani Volanen on tämän julkkisnaisen ex-mies!

      Jani Volanen näyttelee L/over - ikuisesti minun psykologisessa trillerissä Juhaa. Mutta tiesitkö, että hän on tämän julk
      Tv-sarjat
      7
      1319
    8. Tanskan malli perustuu korkeaan ansioturvaan

      Ja vahvoihin työllisyys- ja kotoutumispalveluihin. Suomessa Riikka on leikannut juuri näitä: palkkatukea, työttömyysturv
      Maailman menoa
      1
      1269
    9. Ajattelen sinua

      Ajattelen sinua joka päivä, joka hetki… Kaikkea, mitä minun olisi pitänyt sanoa sinulle, enkä osannut sanoa, kaikkea nii
      Ikävä
      49
      1234
    10. entäs jos yhtenä päivänä kävisi niin

      että miehet vaan yhtäkkiä kollektiivisesti kyllästyisivät ja lopettaisivat naisten palvelemisen ja naiset saisivat pärjä
      Sinkut
      147
      1006
    Aihe