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ä
      93
      7558
    2. Pieni häivähdys sinusta

      Olet niin totinen
      Ikävä
      40
      3622
    3. Lähetä terveisesi kaipaamallesi henkilölle

      Vauva-palstalta tuttua kaipaamista uudessa ympäristössä. Kaipuu jatkukoon 💘
      Ikävä
      102
      1846
    4. Missä olet ollut tänään kaivattuni?

      Ikävä sai yliotteen ❤️ En nähnyt sua tänään söpö mies
      Ikävä
      24
      1060
    5. 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
      32
      943
    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
      27
      911
    7. 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
      807
    8. 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
      732
    9. Tähän vaivaan ei auta kuin kaksi asiaa

      1. Tapaaminen uudestaan tai 2. Dementia Anteeksi kun olen olemassa🙄
      Ikävä
      60
      729
    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
      26
      662
    Aihe