Produktionsplan
21.03.2019 15:11:46
Coois
ich benötige dringend Hilfe von klugen Köpfen.
Kurz gefasst: eine Tabelle in der die Fertigungszeiten getaktet werden, auf Basis der kalkulierten Fertigungszeit. Arbeit im 3-Schicht-Betrieb à 450 Minuten, Mo-Fr. Freitags beginnt die Nachtschicht um 21:30 Uhr und endet Samstagmorgen um 05:30 Uhr. Sonntag wird nicht gearbeitet, Montag geht es wieder los um 05:30 Uhr.
Problem: Excel rechnet Mo-So. Wenn ein Auftrag jetzt auf Samstag größer 05:30 Uhr fällt, soll Excel 2 Tage dazu rechnen. An einem Sonntag soll Excel einen Tag dazu rechen, egal welche Uhrzeit, da sonntags die Produktion steht. Auch an Feiertagen soll Excel weiter rechnen bis zum nächsten Arbeitstag. Allerdings wird auch in die Feiertage, die auf einen Werktag fallen bis 05:30 Uhr hineingearbeitet.
Mein Ansatz in VBA:
Sub Woche()
For Each cell in Worksheets ("Control").Range("L24:L65000")
If Weekday(cell, vbMonday) = 7 Then
cell.Value = cell.Value + 1
ElseIf Weekday(cell, vb Monday) = 6 Then
cell.Value = cell.Value + 2
End If
Next cell
End Sub
Bei diesem Code wird allerdings nicht berücksichtigt, dass samstags bis 05:30 Uhr gearbeitet wird. Feiertage sind ebenfalls nicht mit drin.
Ich verstehe nicht, wie ich hier eine Datei oder einen Screenshot anhängen kann, deshalb zum Verständnis:
In Spalte "D" steht die Kalk. Fertigungszeit in Minuten
In Spalte "E" werden die Minuten von Spalte "D" in Stunden umgerechnet, mit folgender Formel: =D24/60/24+D24/15/60/24 und Format: [hh]:mm:ss
In Spalte "L" wird das Produktionsdatum berechnet durch Formel: =L24+E24
Ich hoffe mir kann jemand helfen.
Danke im voraus :)