Ich halte -insbesondere nach der Erweiterung der Aufgabe- erst recht VBA für eine sinnvollere Lösung. Über einen Button einen neuen Block einfügen lassen und je nach Anzahl der Vorgangsgruppen die erforderliche Gruppe bzw. Zwischenzeile einfügen.
mmmh wirkich so aufwendig das ganze?
Dachte ich könnte es vielleicht noch in die bestehende WENN-Funktion einbauen. Leider gelingt mir das nicht.
Hi,
(16.01.2016, 15:55)gerrard87 schrieb: [ -> ]mmmh wirkich so aufwendig das ganze?
ja, denn die Aufgabe ist auch aufwendig.
Hallo,
Hier eine Formellösung für das genannte System (wenn ich das richtig verstanden habe):
| Arbeitsblatt mit dem Namen 'Tabelle1' |
| | L |
| 1 | Zuschneiden |
| 2 | Ablegen |
| 3 | Pressen |
| 4 | Entformen |
| 5 | Zuschneiden |
| 6 | Ablegen |
| 7 | Pressen |
| 8 | Entformen |
| 9 | Zuschneiden |
| 10 | Ablegen |
| 11 | Pressen |
| 12 | Entformen |
| 13 | Trennmittelauftrag |
| 14 | Zuschneiden |
| 15 | Ablegen |
| 16 | Pressen |
| 17 | Entformen |
| 18 | Zuschneiden |
| 19 | Ablegen |
| 20 | Pressen |
| 21 | Entformen |
| 22 | Zuschneiden |
| 23 | Ablegen |
| 24 | Pressen |
| 25 | Entformen |
| 26 | Trennmittelauftrag |
| 27 | Zuschneiden |
| 28 | Ablegen |
| 29 | Pressen |
| 30 | Entformen |
| 31 | Zuschneiden |
| 32 | Ablegen |
| 33 | Pressen |
| 34 | Entformen |
| 35 | Abkühlzeit |
| 36 | Rüstzeit Abbau |
| 37 | Formen reinigen |
| 38 | Rüstzeit Aufbau |
| 39 | Aufheizzeit |
| Zelle | Formel |
| L1 | =WENN(REST(ZEILE(A1)-1;39)+1>34;WAHL(REST(ZEILE(A1)-1;39)-33;"Abkühlzeit";"Rüstzeit Abbau";"Formen reinigen";"Rüstzeit Aufbau";"Aufheizzeit");WENN(REST(ZEILE(A1);13)=0;"Trennmittelauftrag";WAHL(REST(REST(ZEILE(A1);13)-1;4)+1;"Zuschneiden";"Ablegen";"Pressen";"Entformen"))) |
| Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg |
Hallo,
diese Formel funktioniert für 228 Arbeitsschritte, der erste Wert muß aber von Hand in
Zeile 1 eingetragen werden:
| Arbeitsblatt mit dem Namen 'Tabelle1' |
| | O |
| 1 | Zuschneiden |
| 2 | Ablegen |
| 3 | Pressen |
| 4 | Entformen |
| 5 | Zuschneiden |
| Zelle | Formel |
| O2 | =WENN(ZEILE()<5;WAHL(ZEILE();"Zuschneiden";"Ablegen";"Pressen";"Entformen");WENN((REST(ZÄHLENWENN($O$1:O1;"Zuschneiden");3)=0)*(O1="Entformen");"Trennmittelauftrag";WENN((REST(ZÄHLENWENN($O$1:O1;"Zuschneiden");8)=0)*((O1="Entformen")+(O1="Trennmittelauftrag"));WAHL(ZEILE()-MAX(WENNFEHLER(VERWEIS(9;1/($O$1:O1="Trennmittelauftrag");ZEILE($O$1:O1));0);VERWEIS(9;1/($O$1:O1="Zuschneiden");ZEILE($O$1:O1))+3);"Abkühlzeit";"Rüstzeit Abbau";"Formen reinigen";"Rüstzeit Aufbau";"Aufheizzeit");WAHL(REST(ZEILE()-MAX(WENNFEHLER(VERWEIS(9;1/($O$1:O1="Trennmittelauftrag");ZEILE($O$1:O1));0)+1;VERWEIS(9;1/($O$1:O1="Zuschneiden");ZEILE($O$1:O1)));4)+1;"Zuschneiden";"Ablegen";"Pressen";"Entformen")))) |
| Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg |