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

970

    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


      • kunde
        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. Tiedätkö, että haluaisin panna

      Sinua. Onko sinulla samanlaiset ajatukset ja tunteet?
      Ikävä
      182
      4300
    2. Hyväksytty kaivattusi

      Vartaloa vai et? Rehellinen vastaus
      Ikävä
      34
      1584
    3. Minulta loppuu aika

      Halusin olla täydellinen. Nyt näyttää siltä että viimeinen kiristys jää puolitiehen, sillä h-hetki on jo ihan kohta käsi
      Ikävä
      40
      1500
    4. Syvälliset keskustelut

      Olisivat tärkeintä ensisijaisesti hänen kanssaan Tulisi sellainen hetki, mutta kaikki meni pieleen
      Ikävä
      25
      1484
    5. Olisipa sitä henkisesti eheämpi ja rohkeampi

      mikään maallinen mammona ei itseäni kiinnosta, eikä sen menetys kiinnostus. Mutta kun kohtaa jonkun sykäyttävän ihmisen,
      Ikävä
      20
      1375
    6. Mitä ajattelet

      Kun näet kaivattuasi?
      Ikävä
      112
      1306
    7. Moi, nainen

      Tunnustan, olen heikkona sun hymyyn, ja sekään ei auta yhtään, että sulla on täydellinen nenä. Joten ensi kerralla, kun
      Ikävä
      30
      1190
    8. Kyllähän tämä vähän kirpaisee

      Mutta oman sisäisen rauhan vuoksi jätän sinut nyt historiaan. Todennäköisesti olet jo sinäkin mennyt eteenpäin. Olipah
      Ikävä
      38
      1187
    9. Nyt on pakko tunnustaa

      AA että on ikävä sinua!!
      Ikävä
      19
      1149
    10. Sulla on uskomaton luonne

      Saat minut hetkessä iloiseksi, tai sanotaan nyt niin, että ajatus sinusta saa sydämeni hyppimään riemusta. En vain saa s
      Ikävä
      44
      1038
    Aihe