Beregning af skifteadherens tid for givet skift ved hjælp af VBA i Microsoft Excel

Anonim

I denne artikel vil vi oprette en brugerdefineret funktion eller UDF til at beregne skiftets overholdelsestid for agenterne.

Rådata for dette eksempel består af agent -id sammen med login og logout -tid for hver agent for dagen. Vi har også defineret skiftets start og skift sluttid.

Vi har brugt brugerdefineret funktion "TimeInterval" til at beregne skifteadherence tid. Denne funktion tager fire parametre som input.

Funktion TimeInterval (Login, Logout, ShiftStartTime, ShiftEndTime)

Skift starttidspunkt er defineret i cellen C7 og skiftets sluttid er defineret i cellen C8.

Logisk forklaring

For at beregne skifteadherens -tid har vi ændret login -tiden til skiftets starttid. Hvis login -tid er tidligere end skiftets starttid, betragtes skiftets starttid som login -tid. Hvis udlogningstiden er sen end skiftets sluttid, betragtes skiftets sluttid som logouttid. Nu vil forskellen mellem login- og logout -tiden give skiftets overholdelsestid.

Følg venligst nedenstående for koden

 Mulighed Eksplicit funktion TimeInterval (Log ind som dobbelt, Log ud som dobbelt, _ ShiftStartTime som dobbelt, ShiftEndTime som dobbelt) 'Kontrol af, om login -tid er mindre end logout -tid Hvis Login> Logout Så TimeInterval = "Login -tid skal være mindre end logout -tid" Afslut Funktion Slut Hvis 'Hvis login er mindre end skiftets starttid, ændres login -tid til skift -starttid Hvis Login ShiftEndTime Så Logout = ShiftEndTime TimeInterval = Logout - Login Slutfunktion 

Hvis du kunne lide denne blog, kan du dele den med dine venner på Facebook. Du kan også følge os på Twitter og Facebook.

Vi vil meget gerne høre fra dig, lad os vide, hvordan vi kan forbedre vores arbejde og gøre det bedre for dig. Skriv til os på e -mail -stedet