transponieren mehrer Zeilen in 1 Spalte
31.07.2015 14:22:22
Kay
ich habe eine Aufgabe zu lösen die mein VBA-Wissen bei weitem überschreitet.
Deshalb meine Post mit der Hoffnung um Hilfe.
Ich habe ein Datei mit Artikeldaten die auf verschiedenen Tabellen verteilt sind. Unter anderem eine Tabelle mit Produktionsdaten. Je Zeile ein Artikel mit ungefähr 50 verschiedenen Datum. (ca. 6000 Zeilen)
Von diesen 50 verschiedenen Daten (Datums) würde ich gerne 20 in einer anderen Datei in eine Spalte untereinander kopieren (transponieren) und dabei in einer anderen Spalte die Artikelnummer zu jedem Datum dazu kopieren.
Das Makro sollte solange durchlaufen bis die nächste Zeile leer ist.
Wenn in einer Zeile "n.d." oder "Lager" steht sollte die Zeile übersprungen werden.
Zum besseren Verständnis habe ich zwei Datein angefügt die die Problemstellung zeigen.
Vielen Dank schonmal
Kay