Office: Anhand von KW und Zeit aktuelle Schicht ermitteln

Hallo zusammen.

Ich benötige ein Makro, was anhand von der Kalenderwoche und der Uhrzeit automatisch die Schicht ermittelt. Der Mitarbeiter drückt also nur noch auf einen Button und seine Schicht (in der er sich aktuell befindet) wird ausgegeben.

Als Beispiel die nächsten 3 Wochen:

KW: 22
22:00 – 06:00 Uhr Schicht 3
06:00 – 14:00 Uhr Schicht 2
14:00 – 22:00 Uhr Schicht 1

KW: 23
22:00 – 06:00 Uhr Schicht 2
06:00 – 14:00 Uhr Schicht 1
14:00 – 22:00 Uhr Schicht 3

KW: 23
22:00 – 06:00 Uhr Schicht 1
06:00 – 14:00 Uhr Schicht 3
14:00 – 22:00 Uhr Schicht 2

…und so weiter


Schichtmodell ist also rückwärtsrotierend.
Ich habe leider keine Ahnung wie ich sowas möglichst effizient schreiben könnte. Bei mir würde wahrscheinlich ein 10000 Zeilen langer Code irgendwann entstehen. Habt ihr für mich ein paar gute Ideen? …so dass dieses Makro auch noch nach Jahren laufen würde?

Vielen Dank im Voraus,

Mit freundlichen Grüßen,

Danny.

:)

 

Halloy Danny,

Dir nun abstrakt zu erklären, wie man es machen könnte, ist offenbar nicht nur mir zu mühsam.

Vorschlag: Stelle eine Beispieldatei zur Verfügung; ich schätze, dass Du dann kurzfristig eine Lösung aus dem Forum erhalten wirst.

Gruß
Aloys

 

Hallo Danny,

so geht's bei mir:

Tabelle1

	A	B	C	D
1	KW	Beginn	Ende	Schicht
2	22	22:00	06:00	3
3	22	06:00	14:00	2
4	22	14:00	22:00	1
5	23	22:00	06:00	2
6	23	06:00	14:00	1
7	23	14:00	22:00	3
8	24	22:00	06:00	1
9	24	06:00	14:00	3
10	24	14:00	22:00	2
11	25	22:00	06:00	3
12	25	06:00	14:00	2
13	25	14:00	22:00	1

Excel Tabellen im Web darstellen >>

 

Hallo Danny,

wenn es Jahre übergreifend funktionieren soll, sehe ich da ein Problem. Das Jahr hat entweder 52 oder 53 Kalenderwochen. Wenn das Schichtsystem immer rotieren soll (3, 2, 1 usw.), dann ist die KW 22 in 2016 nicht mit der KW 22 in 2017 identisch und alle anderen auch nicht. Soll die Rotation (3 Wochen) beibehalten werden oder in KW 1 von vorne beginnen? Dann würde die KW 52 dieses Jahr 3, 2, 1 enden und die KW 1 nächstes Jahr 3, 2, 1 beginnen.
Muss es unbedingt über ein Makro laufen?

Gruß Foulcrow

 

Hallo Danny,

wenn es nicht unbedingt per VBA sein muss, dann hier mal mein Beispiel per Formel. Ist bis 2019 vorgetragen.

Gruß Foulcrow

 

Hallo zusammen,

ich benötige für eine fast automatische Schichtplanung Eure Hilfe.

Anbei die Schichtplanung in kleinen Detail.

Was soll unterm Strich rauskommen?

Ziel ist es, dass Excel angibt, wenn Mitarbeiter B am 03.04. eine Spätschicht hat, dann soll auch die Telefonie in der Spätschicht (13:00 bis 18:00 Uhr) sein.

Zweiter Schritt.
Wenn Mitarbeiter E am 03.04. in der Spätschicht telefoniert hat, dann soll er am 10.04. in der Frühschicht telefonieren.

Die eventuellen Krankmeldungen oder sonstige Ausfälle sollen auch berücksichtigt werden.

Ich hoffe, dass ihr mir weiterhelfen und meine Schritte nachvollziehen könnt.

Vielen Dank für Eure Untersützung.

Gruß
Sparky-84-

 

Schon ein wenig dreistes Crossposting: Man versteckt sich hinter zwei alten Threads, statt ehrlich EINEN neu aufzumachen!