Kuinka saan numerosarjan pilkottua yksittäisiksi numeroiksi

Pete H

Eli ongelmana on saada numerosarja pilkottua yksittäisiksi numeroiksi, niin että myös toisen solun sisältö pysyy samana. Saisiko tuon jollain kaavalla? Esimerkki.

Nyt on
Solu1 Solu2 Solu3
1 1 A
2 2 B
3 6 C
7 7 D


Pitäisi saada

1 A
2 B
3 C
4 C
5 C
6 C
7 D

10

991

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ?!

      vaikea saada selvää tuosta. Onko yhdessä solussa 11A ja se pitäisi saada pilkottua useampaan soluun vai 1,1 ja A ovat kolmessa (3) eri solussa ja niistä pitäisi muodostaa uuteen soluun joku "parivaljakko"?

      • Pete H

        Kyseessä on siis numerosarjoja. Osassa ei varsinaisesti ole välejä ja osassa on. Ne pitäisi saada yksittäisiksi numeroiksi. Eli ensimmäinen numero sarja on 1-1 A (t.s. siinä ei ole mitään väliä vaan arvolla yksi tulee A) ja toisessa 2-2 B 3-6 C. Eli käytännössä on siis ongelma saada toi numero sarja 3-6 C, niin että siitä tulisi:
        3 C
        4 C
        5 C
        6 C


      • Pete H
        Pete H kirjoitti:

        Kyseessä on siis numerosarjoja. Osassa ei varsinaisesti ole välejä ja osassa on. Ne pitäisi saada yksittäisiksi numeroiksi. Eli ensimmäinen numero sarja on 1-1 A (t.s. siinä ei ole mitään väliä vaan arvolla yksi tulee A) ja toisessa 2-2 B 3-6 C. Eli käytännössä on siis ongelma saada toi numero sarja 3-6 C, niin että siitä tulisi:
        3 C
        4 C
        5 C
        6 C

        Niin mainittakoon vielä, että siis noi numerosarjat on tällä hetkellä kahdessa eri solussa, esim. A1 ja B1 ja toi kirjain sitten kolmannessa solussa C1.

        Vähän lyhennetty esimerkki:
        A1 B1 C1
        1 1 A
        3 6 C

        Pitäisi saada
        A1 B1 (voi tietenkin olla myös B1 ja C1)

        1 A
        3 C
        4 C
        5 C
        6 C


      • oikeasti haluat
        Pete H kirjoitti:

        Niin mainittakoon vielä, että siis noi numerosarjat on tällä hetkellä kahdessa eri solussa, esim. A1 ja B1 ja toi kirjain sitten kolmannessa solussa C1.

        Vähän lyhennetty esimerkki:
        A1 B1 C1
        1 1 A
        3 6 C

        Pitäisi saada
        A1 B1 (voi tietenkin olla myös B1 ja C1)

        1 A
        3 C
        4 C
        5 C
        6 C

        Ei ymmärrä !
        Viimeisestä viestistäsi ymmärrän että sinulla on solussa A1 1, B1 1 ja C1 A ??
        jos haluat esim D1 1A laita D1 soluun =A1&C1


      • oikeasti haluat kirjoitti:

        Ei ymmärrä !
        Viimeisestä viestistäsi ymmärrän että sinulla on solussa A1 1, B1 1 ja C1 A ??
        jos haluat esim D1 1A laita D1 soluun =A1&C1

        no problems...
        palaan ensiviikolla asiaan kun taas normaali enkkuversio kaytossa


    • AT-maikka

      minä sain tuon yo. esimerkin hoidettua funktiolla poimi.teksti
      sarake A sarake B sarake C
      =POIMI.TEKSTI(A30;1;1) =POIMI.TEKSTI(A30;3;1) ja kolmanteen sarakkeeseen tulee =B30&C30
      kopio täyttökahvalla
      muitakin ratkaisuja on. Tämä toimivain < 10 numeroilla

      • AT-maikka

        Ai niin täss muotoilut häviää. Ymmärsin ehkä väärin tehtävän jos pitää yhdistää kakden solun esim b30 ja c30 tekstit niin funktiolla =B30&c30


      • AT-maikka kirjoitti:

        Ai niin täss muotoilut häviää. Ymmärsin ehkä väärin tehtävän jos pitää yhdistää kakden solun esim b30 ja c30 tekstit niin funktiolla =B30&c30

        moduuliin...
        esimerkissä pilkkoo solualueen (taulukko Sheet1) A1:C10 solusta E1 alaspäin
        muuttele sopivaksi

        Dim i As Integer
        Sub Koe(OriginaaliAlue As Range, KopioAlue As Range)
        Worksheets("Sheet1").Activate
        KopioAlue.Resize(1000, 2) = ""
        For Each Row In OriginaaliAlue.Rows
        KopioAlue.Select
        i = 0
        For i = Row.Cells(1, 1) To Row.Cells(1, 2)
        KopioAlue = i
        KopioAlue.Offset(0, 1) = Row.Cells(1, 3)
        Set KopioAlue = KopioAlue.Offset(1, 0)
        Next
        Next
        End Sub
        Sub Testi()
        Koe Range("A1:C10"), Range("E1")
        End Sub


      • ongelmako?
        kunde kirjoitti:

        moduuliin...
        esimerkissä pilkkoo solualueen (taulukko Sheet1) A1:C10 solusta E1 alaspäin
        muuttele sopivaksi

        Dim i As Integer
        Sub Koe(OriginaaliAlue As Range, KopioAlue As Range)
        Worksheets("Sheet1").Activate
        KopioAlue.Resize(1000, 2) = ""
        For Each Row In OriginaaliAlue.Rows
        KopioAlue.Select
        i = 0
        For i = Row.Cells(1, 1) To Row.Cells(1, 2)
        KopioAlue = i
        KopioAlue.Offset(0, 1) = Row.Cells(1, 3)
        Set KopioAlue = KopioAlue.Offset(1, 0)
        Next
        Next
        End Sub
        Sub Testi()
        Koe Range("A1:C10"), Range("E1")
        End Sub

        Solun sisällä on tämä: 1.1.2010 - 9:45 - 14:45 - 1:08. Miten saan 1.1.2010, 9:45, 14:45 ja 1:08 omiin soluihin, jotta voisin suorittaa laskutoimituksia solujen välillä? Edellä olevasta viestistä en ymmärtänyt yhtään mittään.


      • ...
        ongelmako? kirjoitti:

        Solun sisällä on tämä: 1.1.2010 - 9:45 - 14:45 - 1:08. Miten saan 1.1.2010, 9:45, 14:45 ja 1:08 omiin soluihin, jotta voisin suorittaa laskutoimituksia solujen välillä? Edellä olevasta viestistä en ymmärtänyt yhtään mittään.

        Teksti sarakkeisiin, erottimeksi -
        http://office.microsoft.com/fi-fi/excel/HA101023401035.aspx


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

    Luetuimmat keskustelut

    1. Laitetaas nyt kirjaimet tänne

      kuka kaipaa ja ketä ?
      Ikävä
      100
      8751
    2. Pieni häivähdys sinusta

      Olet niin totinen
      Ikävä
      47
      4319
    3. Lähetä terveisesi kaipaamallesi henkilölle

      Vauva-palstalta tuttua kaipaamista uudessa ympäristössä. Kaipuu jatkukoon 💘
      Ikävä
      102
      1946
    4. Taas ryssittiin oikein kunnolla

      r….ä hyökkäsi Viroon sikaili taas ajattelematta yhtään mitään https://www.is.fi/ulkomaat/art-2000011347289.html
      NATO
      38
      1516
    5. Missä olet ollut tänään kaivattuni?

      Ikävä sai yliotteen ❤️ En nähnyt sua tänään söpö mies
      Ikävä
      24
      1460
    6. Valtimon Haapajärvellä paatti mäni nurin

      Ikävä onnettomuus Haapajärvellä. Vene hörpppi vettä matkalla saaren. Veneessä ol 5 henkilöä, kolme uiskenteli rantaan,
      Nurmes
      34
      1199
    7. Vanha Suola janottaa Iivarilla

      Vanha suola janottaa Siikalatvan kunnanjohtaja Pekka Iivaria. Mies kiertää Kemijärven kyläjuhlia ja kulttuuritapahtumia
      Kemijärvi
      12
      1180
    8. Rakastuminenhan on psykoosi

      Ei ihme että olen täysin vailla järkeä sen asian suhteen. Eipä olis aikoinaan arvannut, että tossa se tyyppi menee, jonk
      Ikävä
      53
      887
    9. Olisinko mä voinut käsittää sut väärin

      Nyt mä kelaan päässäni kaikkea meidän välillä tapahtunutta. Jos mä sit kuitenkin tulkitsin sut väärin? Se, miten sä käyt
      Ikävä
      31
      862
    10. Känniläiset veneessä?

      Siinä taas päästiin näyttämään miten tyhmiä känniläiset on. Heh heh "Kaikki osalliset ovat täysi-ikäisiä ja alkoholin v
      Nurmes
      29
      837
    Aihe