Lajittelu omiin soluihin

lajittelija

Onnistuuko sellainen lajittelu excelissä että on joukko numeroita, vaikka pilkulla erotettuna ja lajittelen numerot omiin sarakkeisiin niin että jos löytyy 1 niin lisätään ykkösten sarakkeeseen jos löytyy 2 niin lisätään kakkosen sarakkeeseen ja jos jotain numeroa ei ole niin sen sarake jää tyhjäksi.

1

72

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • hiukkasen epä,ääräinen toi selostus, mutta tossa idea miten homma hoituu ja helppohan sitä on fiksata mieleisekseen

      Sub Lajittele()
      Dim a As Variant
      Dim i As Integer
      On Error Resume Next
      If ActiveCell = "" Then Exit Sub
      a = Split(ActiveCell, ",")
      ActiveCell.EntireRow = ""
      For i = 0 To UBound(a)
      Cells(ActiveCell.Row, Val(a(i))) = Val(a(i))
      Next
      End Sub



      Keep EXCELing
      @Kunde

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

    Luetuimmat keskustelut

    1. JOKO OLETTE KUULLET, MITÄ KIURUVEDELLÄ ON SATTUNUT!

      Oletteko jo kuulleet, mitä Kiuruvedellä on sattunut, voi hyvänen aika? Aivan viime tuntien aikana olisi sattunut, jos t
      Kiuruvesi
      41
      13262
    2. V*ttuu että mä haluan sua

      Jos jotain ihmistä voi kunnolla haluta, niin hän on se. Voi Luoja auta jo! Joku jeesus hjelppa mej!
      Ikävä
      96
      4705
    3. Nolointa ikinä miehelle

      On ghostata nainen jonka kanssa on ollut ystävä tai ollu orastavaa tapailua pidemmän aikaa. Osoittaa sellaista moukkamai
      Ikävä
      119
      4246
    4. Katsoitko mua yhtään

      Kun nähtiin 🥺.
      Ikävä
      51
      3728
    5. Eli jos toisen hiki haisee ns. omaan nenään siedettävältä

      Se kertoo hyvästä yhteensopivuudesta. Selvä! Olet mies minun. 🫵🥳
      Ikävä
      57
      3453
    6. Mikä sinua eniten

      Huolestuttaa tässä tilanteessa?
      Ikävä
      120
      3397
    7. Sattuma ja muutama väärinkäsitys

      vaikuttivat siihen millaiseksi tämä kaikki muodostui. Pienet aikanaan huomaamattomat käänteet. Seuraava näytös on jo tul
      Ikävä
      51
      2345
    8. Koska olet viimeksi nähnyt ikävän kohteesi?

      Ja mitä tarjoat hänelle kun koputtaa oveesi?
      Ikävä
      47
      2329
    9. Keskusta hajoaa Palojärvi lähtee

      Suomen Keskustan ryhmä hajoaa Kemijärvellä. Kalastaja Palojärvi sai tarpeekseen ja loikkasi Sitoutumattomat Aati Virkkul
      Kemijärvi
      32
      2100
    10. On sillä rääpyä

      Tuo ex kuntajohtaja Lea Tolonen kehtaakin tulla Ähtäriin. Ajoi laivan Karille. Kari Heikkilä oikaisi taloutta, sai laiva
      Ähtäri
      15
      1763
    Aihe