Izračunavanje vremena pridržavanja pomaka za datu smjenu pomoću VBA u programu Microsoft Excel

Anonim

U ovom ćemo članku stvoriti prilagođenu funkciju ili UDF za izračunavanje vremena pridržavanja pomaka za agente.

Sirovi podaci za ovaj primjer sastoje se od ID -a agenta zajedno s vremenom prijave i odjave svakog agenta za taj dan. Također smo definirali vrijeme početka smjene i vrijeme završetka smjene.

Za izračunavanje vremena pridržavanja pomaka koristili smo prilagođenu funkciju "TimeInterval". Ova funkcija uzima četiri parametra kao ulaz.

Interval TimeInterval (Prijava, Odjava, ShiftStartTime, ShiftEndTime)

Vrijeme početka pomaka definirano je u ćeliji C7, a vrijeme završetka pomaka definirano je u ćeliji C8.

Logično objašnjenje

Kako bismo izračunali vrijeme pridržavanja pomaka, promijenili smo vrijeme prijave u vrijeme početka pomaka. Ako je vrijeme prijave ranije od vremena početka smjene, tada će se vrijeme početka smjene smatrati vremenom prijave. Ako vrijeme odjave kasni od vremena završetka smjene, tada će se vrijeme završetka smjene smatrati vremenom odjave. Sada će razlika između vremena prijave i odjave dati vrijeme pridržavanja pomaka.

Molimo slijedite dolje za kôd

 Opcija Eksplicitna funkcija TimeInterval (Prijava kao dvostruka, odjava kao dvostruka, _ ShiftStartTime kao dvostruka, ShiftEndTime kao dvostruka) 'Provjera je li vrijeme za prijavu manje od vremena za odjavu Ako je Prijava> Odjava Tada TimeInterval = "Vrijeme prijave treba biti manje od vremena odjave" Izlaz Funkcija Kraj Ako je 'Ako je prijava manja od vremena početka smjene, tada se mijenja vrijeme prijave za vrijeme početka pomaka Ako se prijavi ShiftEndTime Zatim se odjavi = ShiftEndTime TimeInterval = Odjavi se - funkcija završetka prijave 

Ako vam se dopao ovaj blog, podijelite ga sa svojim prijateljima na Facebooku. Također, možete nas pratiti na Twitteru i Facebooku.

Voljeli bismo vas čuti, javite nam kako možemo poboljšati svoj rad i učiniti ga boljim za vas. Pišite nam na web stranici e -pošte