Sarakkeet yhdeksi sarakkeeksi

Excelisti

Ongelmana siis on se että aineiston muokkauksessa pelkkä copy-paste on liian hidasta. Kuinka saan usean kymmenen sarakkeen tiedot yhteen sarakkeeseen siten, että jokaisen liitettävän sarakkeen ensimmäinen solu tulisi edellisenä liitetyn sarakkeen jälkeen? Ts. tavallinen peräkkäinen copy-paste ilman aikaa vievää manuaalista kopioimista

2

450

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • muuan mies

      Eikö tavallinen & toimi?
      K1=A1&B1&C1&D1&E1&f1&G1&H1&I1&J1
      Ja tarvittaessa väleja jokaiseen väliin myös &" "

      • ei tietoa onko sarakkeet peräkkäin vaiko siellä täällä ja mihin kopioidaan
        mutta tällä alkuun...
        muuttele kohdesarake sopivaksi, nyt A sarake ja alkaa A1.
        Toimii siten, että maalaat kopioitavan alueen ja kopioi tiedot alkaen A1

        moduuliin...

        Sub YhteenSarakkeeseen()
        Dim Alue As Range
        Dim Sarake As Integer
        On Error GoTo virhe
        Set Alue = Application.Intersect(Selection, ActiveSheet.UsedRange)
        Range("A:A") = ""
        For Sarake = 1 To Alue.Columns.Count
        If Sarake = 1 Then
        Alue.Range(Cells(1, Sarake), Cells(Alue.Rows.Count, Sarake)).Copy Range("A1")
        Else
        Alue.Range(Cells(1, Sarake), Cells(Alue.Rows.Count, Sarake)).Copy Range("A65536").End(xlUp).Offset(1, 0)
        End If
        Next Sarake
        poistu:
        Exit Sub
        virhe:
        MsgBox "et valinnut sarakkeita!"
        GoTo poistu
        End Sub


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

    Luetuimmat keskustelut

    1. Riikka Purran kaudella nousi bensan hinta yli 2 euron

      Muistatteko kuinka edellisen vasemmistohallituksen aikana, ns. Marinin aikakaudella, bensiiniä sai 1,3 euron litrahinnal
      Maailman menoa
      138
      4876
    2. Veli Sofia teki urosmehiläisen työn

      Paljastaessaan kuinka TPS:ssä ei joukkuehenki toimi sooloilijoiden vuoksi, jonka takia koko seura ei pärjää kilpailussa
      Maailman menoa
      18
      3527
    3. Mitäs nyt sijoittajat?

      Pörssit laskevat maailmalla Iranin sodan takia ja muutenkin ovat olleet Trumpin vallan alla epävarmat. Ainoa, mikä on no
      Maailman menoa
      158
      3337
    4. Hjallis Harkimon, 72, Jasmine-rakas, 37, paljastaa suhteen alusta: "Vähän..."

      Liikemies, kansanedustaja Hjallis Harkimo ja tuottaja-juontaja Jasmine Pajari ovat pariskunta. He asuvat yhdessä Sipooss
      Suomalaiset julkkikset
      32
      2798
    5. Unisex-vessat

      Ahdistaa. Miksi kaikki pitää tasapäistää tasa-arvon nimissä? Tasa-arvo on sitä, että kunnioitetaan sukupuolien erilaisu
      Tunteet
      93
      2549
    6. Jutta Larm, 52, haluaa kumota tämän piintyneen ikämyytin

      Oletko samaa mieltä? Jutta Larm on 52-vuotias ja tehnyt pitkän uran yrittäjänä. Hän haluaa kumota tämän piintyneen ikämy
      50 plus
      18
      1853
    7. Henri Alen tilittää yllättäen Vappu Pimiän uudesta MasterChef -pestistä: "Vaikka hän ei..."

      Vappu Pimiä on uusi MasterChef Suomi -tuomari. Hän liittyi uudella MasterChef Suomi -kaudella arvovaltaiseen tuomaristoo
      Suomalaiset julkkikset
      10
      1462
    8. Jäit kiinni siitä

      että katselet minua. Käänsin pääni, minäkin etsin sinua, ja meidän katseemme kohtasivat. Eikä se haittaa - molemmat ky
      Ikävä
      8
      1448
    9. Vastuun ottaminen omasta hyvinvoinnista

      Olen huomannut tuttavapiirissäni ihmisiä, joilla on mt-diagnooseja. Sen sijaan, että millekään asialle yritettäisiin teh
      135
      1378
    10. Minkä kouluarvosanan 4-10 annat Beck-leffoille?

      Vähiin käy ennen kuin loppuu... Beck-elokuvia on tullut tv:stä jopa 2-3 viikossa. Nyt leffojen esitystiheys on muuttunut
      Elokuva
      11
      1267
    Aihe