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

602

    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. Tänään pyörit ajatuksissa enemmän, kun erehdyin lukemaan palstaa

      En saisi, silti toivon että sinä vielä palaat ja otetaan oikeasti selvää, hioituuko särmät ja sulaudummeko yhteen. Vuod
      Ikävä
      22
      5614
    2. Huomenta ihana

      Kauniskasvoinen ihanuus 😘 saan sut vielä
      Ikävä
      32
      4960
    3. Hei rakas...

      Miten on työpäivä sujunut? Rakastan sinua 💗
      Ikävä
      29
      2864
    4. Edelleen sitä on vaikea uskoa

      Että olisit oikeasti rakastunut muhun
      Ikävä
      34
      2384
    5. Toiveikas vai toivoton

      torstai? Ajatuksia?
      Ikävä
      37
      2088
    6. Vitsi mihin menit. Heti takasin.

      Mä näin sut tuu takasin! Oli kiire, niin en ehtiny sin perään!
      Ikävä
      15
      2038
    7. En ole koskaan kokenut

      Ennen mitään tällaista rakastumista. Tiedän että kaipaan sinua varmaan loppu elämän. Toivottavasti ei tarvitsisi vain ka
      Ikävä
      19
      1657
    8. Ei tämä etene ikinä

      Kun kumpikaan ei enää ota yhteyttä. Mä en ainakaan uskalla.
      Ikävä
      26
      1622
    9. Mukavaa päivää

      Mun rakkauden kohteelle ❤️ toivottavasti olet onnellinen
      Ikävä
      12
      1621
    10. Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...

      Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons
      Suomalaiset julkkikset
      30
      1539
    Aihe