Excel, kellonaikojen poiminta solun tekstistä

Anonyymi-ap

Onkohan excelissä mahdollisuutta poimia tekstisolusta kellonaikaa? Solussa on esim. "12:00 - 14:30" tai tekstiä välissä tai perässä esim. "09:00 kahvi - 09:15" tai "13:00 - 13:00 lounas".

Haluaisin saada kellonajat omiin soluihinsa, josta sitten jatkojalostaa niitä esim 09:00 omaan ja 09:15 omaansa.

6

737

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Anonyymi

      Kyllähän kaavoilla saa rakennettua mitä vaan. Jos soluissa on aina vain kaksi kellon aikaa, eikä kaksoispisteitä muualla, niin silloin voi kaksoinpisteitä käyttää avuksi numeroiden poimintaan solusta.

      Ensimmäinen aika:
      =CONCATENATE(MID(A1;SEARCH(":";A1;1)-2;2);":";MID(A1;SEARCH(":";A1;1)+1;2))

      Toinen:
      =CONCATENATE(MID(A1;SEARCH(":";A1;SEARCH(":";A1;1)+1)-2;2);":";MID(A1;SEARCH(":";A1;SEARCH(":";A1;1)+1)+1;2))

      Nuo on sitten vielä tekstimuodossa, joilla ei voi suorittaa laskentaa.

      • Anonyymi

        Ja solu missä ajat sisältävä teksti on noissa kaavoissa solussa A1.


      • Anonyymi

        Kiitos! Nämä toimi hienosti :)


    • Anonyymi

      Selkeytän vielä eli jos solussa on teksti "09:00 kahvi - 09:15 sisään", niin miten saan ajat omiin soluihinsa? Tuo ensimmäinen on helppo (vasen tai poimi.teksti), mutta jälkimmäinen ei, koska selitetekstit saattava vaihdella.

      • Anonyymi

        Tämä funktio antaa annetusta merkkijonosta n:nännen ajan. Oletuksena on, että ajat on merkitty esittämälläsi tavalla.

        Function Aika(s As String, Optional ByVal n As Integer = 1)

        On Error GoTo Err:
            p0 = 1
              For i = 1 To n
                p = InStr(p0, s, ":")
                p0 = p + 1
            Next i

            Aika = CDate(Mid(s, p - 2, 5))
        Exit Function

        Err:
            Aika = "#N/A"
        End Function


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

    Luetuimmat keskustelut

    1. Mikä on sun mielestä suurin kusetus maailmassa?

      Mikä on sun mielestä suurin kusetus maailmassa?
      Ikävä
      157
      4658
    2. rakastan jotakin

      en uskalla sanoa sitä täällä ääneen
      Ikävä
      11
      4138
    3. Vedonlyöntiä .

      Olen valmis lyömään ison vedon , että homma kaatuu . Jos kerta Sivonen ei lähde mukaan , niin ei tuoho usko kukaan muuka
      Ähtäri
      46
      3657
    4. Mikä on pahinta, mitä kaivatullesi

      pelkäät tapahtuvan? Jos kuolemaa, vakavia sairauksia yms. ei lasketa?
      Ikävä
      103
      2895
    5. Turvaan tulleet lähettävät omia lapsiaan vaaraan - hullua

      MOT-ohjelman jakso ”Loma vaihtui kahleisiin” kertoi, kuinka Suomessa ja muualla Euroopassa asuvat somaliperheet lähettäv
      Maailman menoa
      78
      2669
    6. Hei Antti. Minähän varoitin jo 2 v sitten, ettei sinusta tule pääministeriä, vaikka kuinka

      voittaisit vaalit. Vasurit ovat aina puukottaneet toisiaan selkään, eivät koskaan edestäpäin. Marinistit varsinkin IL t
      6
      2018
    7. Minkä tunteen tunnet

      juuri nyt? ap kiitollisuuden.
      Tunteet
      44
      1455
    8. Uusnatsien ilkivalta Joensuussa jatkuu.

      Saavat mellastaa persujen suojissa miten haluavat. Särkevät ja tuhoavat toisten omaisuutta, tähän on johtanut persujen m
      Joensuu
      12
      1288
    9. Minkä kouluarvosanan (4-10) annat Thank God, sä tulit! sarjalle?

      Katsoitko Thank God, sä tulit!? Uusi viihdeohjelma ei ollut kaikkien makuun, mutta jotkut tykkäsivät. Minkä kouluarvos
      Tv-sarjat
      61
      1211
    10. Päivi Räsänen sai kutsun kongressiin todistajaksi.

      Pystyykö Päivi pysymään totuudessa ja kertomaan kongressille, että raamattu ei ole lakikirja jota pitäisi noudattaa poli
      Maailman menoa
      404
      1202
    Aihe