Sarakkeista tiedot riveittäin

sedemik

Toin netistä osoitetietoja Exceliin ja ne ovat siellä nyt kaikki A-sarakkeessa (nimet, osoitteet, postinumerot...)
Nyt pitäisi siirtää henkilön jokainen tieto omaan sarakkeeseen (A-sarakkeessa on nimi, B-sarakkeessa on katuosoite, C-sarakkeessa on postinumero...)

Saakos tähän jonkilaisen järkevän makron tehtyä. Sellaisen osaan, jossa tietyn rivin solusta pystyy siirtämään tiettyn rivin tiettyyn soluun, mutta tämä pitäisi olla riippumaton rivinumerosta.

4

513

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • toi onnistu

      tuolla data-> text to columns toiminnolla...

      • sedemik

        Tämä olisi ollut sitten seuraava kysymys. Kiitos tästä. Mutta palaan vielä alkuperäiseen kysymykseeni.

        Mulla on siis tiedot nyt riveittäin:
        (A1) Martti
        (A2) Hämeenpolku 2
        (A3) 20100 Turku
        (A4)
        (A5) Heikki
        (A6) Hämeenpolku 7
        (A7) 30100 Tampere

        Ne pitäisi saada:
        (A1) Martti (B1) Hämeenpolku 2 (C1) 20100 Turku
        (A2) Heikki (B2) Hämeenpolku 7 (C2) 30100 Tampere

        Osoitetietoja on aikas paljon, joten en viitsi niitä manuaalisesti alkaa siirtelemään jos tähän olisi helpompikin vaihtoehto.


      • auttaako
        sedemik kirjoitti:

        Tämä olisi ollut sitten seuraava kysymys. Kiitos tästä. Mutta palaan vielä alkuperäiseen kysymykseeni.

        Mulla on siis tiedot nyt riveittäin:
        (A1) Martti
        (A2) Hämeenpolku 2
        (A3) 20100 Turku
        (A4)
        (A5) Heikki
        (A6) Hämeenpolku 7
        (A7) 30100 Tampere

        Ne pitäisi saada:
        (A1) Martti (B1) Hämeenpolku 2 (C1) 20100 Turku
        (A2) Heikki (B2) Hämeenpolku 7 (C2) 30100 Tampere

        Osoitetietoja on aikas paljon, joten en viitsi niitä manuaalisesti alkaa siirtelemään jos tähän olisi helpompikin vaihtoehto.

        tämä, laittaa tiedot sarakkeisiin B:D
        Sub muokkaa()
        Dim rng As Range
        Dim i As Long
        Dim j As Long
        Set rng = Cells(Rows.Count, 1).End(xlUp)
        j = 1
        For i = 1 To rng.Row Step 4
        Cells(j, "B").Resize(1, 3).Value = _
        Application.Transpose(Cells(i, "A").Resize(3, 1))
        j = j 1
        Next
        End Sub


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

    Luetuimmat keskustelut

    1. SDP on vastuunkantaja, ja siksi suosituin kansan keskuudessa

      Kiusaamiseenkin SDP puuttuu heti sellaisen tultua ilmi. Esimerkiksi persut lakaisevat nämä maton alle ja pahentavat site
      Maailman menoa
      132
      6263
    2. Punavihreät puolueet haluavat Suomeen satoja tuhansia kehitysmaalaisia

      SDP, vihreät ja vassarit haluavat nostaa esim. pakolaiskiintiötä todella paljon. Orpon hallituksen aikana maahanmuutto
      Maailman menoa
      65
      5182
    3. SDP:n johto pesi kätensä häirintäkohusta

      "Suurimman oppositiopuolue SDP:n johto olisi todennäköisimmin halunnut vaieta puolueen ympärillä velloneen häirintäkohun
      Maailman menoa
      74
      4315
    4. SDP on selvästi paras valinta äänestyskopissa

      Puolueella on arvomaailma kohdallaan, sillä on hyvä CV itsenäisen Suomen historiassa vastuunkantajana ja hyvinvointivalt
      Maailman menoa
      102
      3874
    5. Miksei Korhonen (pers) vastaa Kokon (sd) esittämiin kysymyksiin?

      Hyviin käytöstapoihin kuuluu kysymyksiin vastaaminen, eikä alkaa syyttelemään kysymyksen esittäjää. Mikä vaivaa Korhost
      Maailman menoa
      14
      3665
    6. Häirintäkohun keskellä olevalta kansanedustajalta Jani Kokolta (sd) rajua tekstiä somessa.

      https://www.is.fi/politiikka/art-2000011772322.html Ajaakohan tämä SDP:n kansanedustaja Jani Kokko oikein täysillä valoi
      Maailman menoa
      121
      3240
    7. SDP:n selitykset ontuu pahasti - "On käsitelty heti, mutta kukaan ei tiedä"

      Kokoomuslaiset pistää taas demareita nippuun. Tuppuraisen mukaan mukaan SDP:n useat ahdistelutapaukset on käsitelty het
      Maailman menoa
      52
      2566
    8. Oletko nainen turhautunut, kun en tule juttelemaan siellä?

      Haluaisin tottakai tulla. Älä käsitä väärin. Ehkä ensi kerralla?
      Ikävä
      35
      2539
    9. Nyt tuli Suomen somaleista todella ikävää faktaa

      sillä osa somalivanhemmista lähettää lapsiaan kotimaahansa kurinpitolaitoksiin, joissa heitä pahoinpidellään. Illan MOT
      Maailman menoa
      100
      2326
    10. Kähmijä puolueen kannatus romahtamassa

      Erityisesti naiset ovat suuttuneet SDP:lle kertoo asiantuntijat
      Maailman menoa
      69
      2266
    Aihe