Rüstwechsel zeiten raussuchen und addieren

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

es soll ein startdatum und ein enddatum eingegeben werden. vom startdatum bis zum enddatum ist der betrachtungszeitraum.
also wird das eig auf allen linien mit dem gleichem Datum beginnen. aber für das Beispiel habe ich nur R1 2 tage eingefügt.
Barcodewechsel = Rüstwechsel
Er soll jedes mal wenn der Barcode wechselt (auch bei gleichbleibender Schicht), die Differenzzeit "DiffTsec_zu_ECU_vorher" nehmen und sie speichern bzw zu vorherigen Funden dazu addieren.
also Beispiel:
1190 FS 111s
1190 FS 112s
1450 FS 113s
1450 SS 114s
1450 SS 115s
1600 SS 116s
1600 SS 117s
1800 NS 118s
1800 NS 119s
1810 NS 120s
In der Frühschicht gab es einen Rüstwechsel (1190 zu 1450, 113s) daher 113s.
Beim wechsel von der Frühschicht zur Spätschicht gab es keinen Rüstwechsel
In der Spätschicht gab es einen Rüstwechsel (1450 zu 1600, 116s) daher 116s.
Beim Wechsel von der Spätschicht zur Nachtschicht gab es einen Rüstwechsel, der zählt dann zur Folgeschicht, also Nachtschicht. (1600 zu 1800, 118s)
Des Weiteren gab es in der Nachtschicht einen weiteren Rüstwechsel(1800 zu 1810, 120s)
Also 118s + 120s = 238s!
FS 113s
SS 116s
NS 238s
Wenn der Betrachtungszeitraum mehr als 1 Tag ist folgt auf die NS wieder die FS usw.

Also wir haben auf der Arbeit das 3 Schicht Modell. Die Frühschicht, hier erkennbar als "FS" in Spalte F, geht von 6:00:00 Uhr bis 13:59:59 Uhr. Die Spätschicht ("SS") geht von 14:00:00 Uhr bis 21:59:59. Die Nachtschicht ("NS") dementsprechend von 22:00:00 Uhr bis 05:59:59 Uhr.
In der Produktion werden Leiterplatten mit einem Barcode versehen, deren erste 4 Ziffern den Leiterplattentyp bezeichnen.
Also beispielsweise autoleiterplatten haben den Barcode 1110 und wenn davon 10 produziert werden, kriegen die die Barcode 1110000001, 1110000002, ... 1110000010. Usw das zählt halt aufwärts.
Wenn 10 autoleiterplatten produziert wurden, wird die Maschine umgerüstet ("Rüstwechsel") auf zB zugleiterplatten die den Barcode 2200 haben. Dieser Rüstwechsel benötigt einige Zeit, die wir rausfinden wollen. Immer wenn eine andere Sorte von Leiterplatte gefahren wird, ändert sich der Barcode und es ist ein Rüstwechsel.
Das Makro zieht sich viele Informationen aus den Datenbanken. Unter anderem den Barcode, die Zeit die es gedauert hat zwischen 2 Leiterplatten. Also 1. Leiterplatte fährt um 13:30:35 rein und die nächste um 13:30:55. Dann steht bei der zweiten LP als Differenzzeitwert "20" drin weil 20 sekunden vergangen sind bis die zweite Leiterplatte den prozess durchlaufen hat.
Dazu kommen noch Informationen aus den Datenbanken bezüglich des Zeitpunktes. Also Datum und Uhrzeit.
Ich will aus all diesen Daten folgende Informationen rausbekommen.
Such raus (Spalte A) wann sich der Barcode ändert, also ein Auftrag abgeschlossen wird und ein Rüstwechsel stattfindet. Dann prüfe welches Datum und Uhrzeit es ist. Dann prüfe welche der drei Arbeitsschichten es ist (Frühschicht "FS", Spätschicht "SS" oder Nachtschicht "NS"). Nun nimm die Zeit zur Leiterplatte zuvor (was ja groß ist, da ein Rüstwechsel statt fand) und sortiere sie der Schicht und dem Datum zu.
Am Ende möchte ich alle Rüstwechselzeiten haben für die Frühschicht des Tages (6 bis 14 uhr) die Spätschicht des Tages (14 bis 22 Uhr) und die Nachtschicht des Tages (22 bis 6 Uhr am nächsten Tag).
Die Informationen sollten dann in etwa so sein "Am 16.01.2018 in der Frühschicht 3 Rüstwechsel haben 3000 sekunden gedauert. In der Spätschicht 2 Rüstwechsel 1987 sekunden. In der Nachtschicht 5 Rüstwechsel 4912 sekunden." "Am 17.01.2018 in der Frühschicht..."
Hoffe das wurde jetzt etwas verständlicher

Beliebteste Forumthreads (12 Monate)

Rüstwechsel zeiten raussuchen und addieren

10 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

10
Beiträge zum Forumthread

Beiträge zu diesem Forumthread