Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ - Jak obliczyć ile godzin przypada w godzinach pracy

perkusista · Forumowicz Wersja: Win Office 365 Posty: 11

Witam

mam problem z obliczeniem ile godzin w danej dobie jest w godzinach pracy serwisu (8-16) w dni robocze.... Jeżeli pojazd przyjedzie o 23 to powinno wyjść 0 natomiast jak pojazd przyjedzie o godzinie 13 to powinno dać nam 3h. w pliku jest wszystko rozpisane.

Czas na bazie.xlsx

Pobierz Plik ściągnięto 16 raz(y) 13.54 KB

umiejead · Wysłany: 01-04-2021, 21:56

Widzę tu VBA. Ale zacząłbym od stworzenia listy unikalnych (polskich) dni wolnych od pracy >> Google.
.

perkusista · Forumowicz Wersja: Win Office 365 Posty: 11

W VBA jestem cienki jak naleśnik, więc to będzie nieco trudne dla mnie... myślałem o formułach bo z tym jestem w stanie sobie poradzić chyba, że mógłbyś mnie naprowadzić jak ustawić plik pod VBA przygotuję wszystko i może wspólnymi siłami by się udało coś zdziałać.

Czy znasz jakąś dobrą książkę/kurs do nauki VBA? Chciałem to tego zagadnienia usiąść i zgłębić ale trafiłem na pozycję, w której wszystko było pisane do osoby wiedzącej o co mniej więcej chodzi w VBA i jak to działa a ja potrzebowałbym coś aby uczyło od samego początku.

Waldek · Wysłany: 03-04-2021, 11:39

Bardzo trafna nazwa pliku, trafna bo na czasie: "Czas na bazie". Bazie - pierwsze oznaki wiosny i symbol Świąt Wielkanocnych.
Ale do rzeczy. W załączniku moja propozycja (na razie bez listy wolnych dni świątecznych o których napisał umiejed). Nie testowałem tych formuł, proszę przetestować i napisać ewentualne uwagi.

Czas na bazie (1).xlsx

Pobierz Plik ściągnięto 10 raz(y) 13.79 KB

perkusista · Forumowicz Wersja: Win Office 365 Posty: 11

Dziękuję za zainteresowanie problemem:) Niestety nie całkiem o to chodziło. W kolumnie (niebieskie tło) przyjazd (tak jak w opisie) chciałem mieć informację ile godzin pojazd przebywał w danej dobie w godzinach pracy serwisu. Jeżeli pojazd przyjechał w dzień roboczy o 13 to znaczy, że tego dnia pojazd na bazie przebywał 3h, w kolumnie pobyt chciałem obliczyć ile godzin/dni w dni robocze pojazd był licząc od dnia następnego po przyjeździe natomiast w kolumnie wyjazd miał być sprawdzony dzień wyjazdu i analogicznie godziny pobytu w godzinach pracy serwisu.... Generalnie chodzi o to abym mógł sprawdzić ile realnie godzin serwis miał na sprawdzenie pojazdu w swoich godzinach pracy. dlatego chcę obliczyć dokładną ilość godzin "aktywnych"

Waldek · Wysłany: 03-04-2021, 17:50

perkusista · Forumowicz Wersja: Win Office 365 Posty: 11

Przeanalizowałem jeszcze raz... jest to nieco inna forma ale efekt taki jak chciałem osiągnąć tylko nie ma tego podziało przyjazd wyjazd a jedynie suma ale w sumie to wystarczy. Dziękuję za pomoc!!!! Będę jeszcze testował formułę, jak będę miał jeszcze jakieś pytanie odnośnie tego to będę pisał, ale teraz dziękuję

Waldek · Wysłany: 03-04-2021, 20:59

Poniżej wersja uwzględniająca ustawowo wolne od pracy dni świąteczne. Do komórki T1 należy wpisać rok, do T16 można wpisać dodatkowy dzień wolny. Tylko w T16 ma być data a nie tekst.

Czas na bazie (2).xlsx

Pobierz Plik ściągnięto 6 raz(y) 14.51 KB

perkusista · Forumowicz Wersja: Win Office 365 Posty: 11

Testowałem plik, zmieniłem kilka moich formuł na podstawie Twoich i działa to super, ale zauważyłem, że źle liczony jest pobyt na bazie. Brakuje 8-16h. Nie całkiem rozumiem formułę, którą napisałeś ale zauważyłem, że jak zmienię jeden argument to wartość godzinowa poprawiona jest o 8h... czy mógłbyś jeszcze raz rzucić okiem na tą formułę? Argument, który prawdopodobnie przyczynia się do tego stanu zaznaczyłem na czerwono

dziękuję

Czas na bazie (2).xlsx

Pobierz Plik ściągnięto 5 raz(y) 16.6 KB

Waldek · Wysłany: 05-04-2021, 21:58

Oczywiście był błąd. Tam miało odejmować 2 dni, ale konkretne, pierwszy i ostatni dzień pobytu. W załączniku poprawiona formuła i na czerwono zmiany. W kolumnie Q poprawiłem formułę tak by uwzględniała dni świąteczne ustawowo wolne od pracy.

Czas na bazie (3).xlsx

Pobierz Plik ściągnięto 17 raz(y) 16.59 KB

perkusista · Forumowicz Wersja: Win Office 365 Posty: 11

teraz działa dobrze, dziękuję... Jutro będę całość implementował do właściwego pliku, mam nadzieję, że uda się wszystko przenieść bez problemu.

Waldek · Wysłany: 13-04-2021, 15:59

Poprawiona formuła:

Kod:

=JEŻELI(LUB(K3="";M3="");"";JEŻELI(L3>J3;SUMA(JEŻELI(DNI.ROBOCZE(J3;J3;$T$3:$T$16)=1;MAX($I$1-MAX(K3-ZAOKR.DÓŁ(K3;0);$H$1);0);0)+JEŻELI(DNI.ROBOCZE(L3;L3;$T$3:$T$16)=1;MAX(MIN(M3-ZAOKR.DÓŁ(M3;0)-$H$1;$H$1);0);0);MAX((JEŻELI.BŁĄD(DNI.ROBOCZE(J3+1;L3-1;$T$3:$T$16);0))*($I$1-$H$1);0));JEŻELI(DNI.ROBOCZE(J3;L3;$T$3:$T$16)=1;MEDIANA($H$1;MAX(M3-ZAOKR.DÓŁ(M3;0));$I$1)-MEDIANA($H$1;MAX(K3-ZAOKR.DÓŁ(K3;0));$I$1);0)))

Czas na bazie (4) .xlsx

Pobierz Plik ściągnięto 9 raz(y) 16.12 KB