VBA kellonajan käsittely

Jooss

Onko toimivia ohjeita seuraavaan :
2 kellonaikaa muotoa 18:00:00.

Pitäisi saada luotettavasti eroteltua montako tuntia on ollut iltavuoroa ja montako tuntia yövuoroa, miten onnistuu ?

aikaväli voi siis olla mitä vain, esim 18:20:00 - 06:00:00 ja tästä ajasta pitäisi poimia montako tuntia on ollut iltavuoroa (18-22) ja montako tuntia yövuoroa (22-06)

Kuulostaa helpolta mutta toteutus ei meinaa onnistua, ainakaan multa :)

2

441

Äänestä

    Vastaukset 2

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Kiila8

      Käytä VBA:n DateDiff-funktiota ja laske erikseen työajan alusta vuoron vaihtumiseen kuluneet ja senjälkeiset tunnit ja minuutit. Esim. näin:

      iltavuorotunnit = DateDiff("h", #18:20#, #22:00:00#) jne.

      • Jooos

        Niin, käsittely taitaa vaatia loopin jokatapauksessa, mietin tuota Datediff funktion käyttöä mutta ongelmaksi tuli juuri se että se vaatii loopin mikä käydään 2 tai 3 kertaa läpi ja tunnit talletetaan muuttujiin, 1 työvuoro kun voi pitää sisällään sekä päivä, ilta ja yövuoroja.

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Uskallanko laittaa sulle viestiä?

      Se viesti on tossa valmiina ja lähettämistä vaille valmis. Kun ei kauhee sti tunneta niin eipä sillä olisi niin väliä. S
      Ikävä
      60
      879

    2. Mikä tekee kaivatustasi

      Haluttavan?
      Ikävä
      34
      837

    3. Onko nyt kaikki asiat käyty läpi?

      Mun mielestä on👍
      Ikävä
      102
      780

    4. Mies joka on oikeasti kiinnostunut

      Ja näkee sut pitkäaikaisena kumppanina, siirtää vaikka vuoria selvittääkseen asiat eikä ota pienintäkään riskiä menettää
      Ikävä
      125
      776

    5. Lehtikankaan oppilas kuolema

      Mistä lie tyttöparka löytyny, mikä ajaa tekemään itsemurhan tuon ikäsenä 😞
      Kajaani
      12
      685

    6. Vieläkin saat

      Sydämen tykyttämään. Vaikka emme näe
      Ikävä
      34
      672

    7. Rauha, sopiiko

      Ei häiritä enää toisiamme. Annetaan molemmille rauha unohtaa, pyydän tätä todella. Kiitos. Miehelle.
      Ikävä
      72
      576

    8. Ikävä niitä hetkiä,kun katselin sua suoraan silmiin...

      😊
      Ikävä
      42
      559

    9. En tahallaan sua välttele...

      Olis niin kiva nähdä jossain muualla kuin kaupassa!
      Ikävä
      40
      557

    10. Ei siitä pääse yli, eikä ympäri!

      Pakko se on myöntää ja tunnustaa. Olisin halunnut p*nna sinua sydämeni kyllyydestä. Itseäni vanhemmalle naiselle
      Ikävä
      63
      529

    11. Kunnanhallitus

      Miten käy täällä vuosia tuomioita jakaneelle valittajalle, hovioikeus hylännyt kaikki syytteet.
      Puolanka
      27
      507

    12. Nyt kaatuu Kuisla

      Reima Kuisla hakee saneeraukseen – Joitakin velkoja on jo ulosotossa https://www.ilkkapohjalainen.fi/reima-kuisla-hakee
      Seinäjoki
      25
      467

    13. Olit hyödytön.

      Mulle hyödytön..
      Ikävä
      87
      446

    14. Kumpi tästä nyt

      Teki niin vaikeaa?
      Ikävä
      58
      442

    15. Miesten (epä)viehättävyydestä kysymys

      Mieltä askarruttava asia, liki dilemma. Palstallahan jotkut miesoletetut usein toteavat, että kaikki naiset tavoittelev
      Sinkut
      107
      438

    16. Pystyisitkö liikkumaan

      Tai tapailemaan kaivattuasi julkisesti?
      Ikävä
      45
      436

    17. Tässä ovat Elämäni biisi vieraat lauantai 19.9. - Yksi vieras on kohuttu TTK-juontajaehdokas

      Elämäni biisi vieraslista on harvinaisen mielenkiintoinen lauantaina. Mukana myös kohuttu TTK-juontajaehdokas, josta ei
      Tv-sarjat
      1
      427

    18. Minkä kappaleen

      haluaisit soivan, kun astellaan alttarille?
      Ikävä
      36
      427

    19. Mikä estää ottamasta yhteyttä?

      🤨
      Ikävä
      39
      413

    20. Vieläkö tykkäät

      Minusta niin paljon että olisit valmis?
      Ikävä
      35
      407
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt