in angefügter Datei habe ich ein kniffliges Problem, daß ich mit meinen bescheidenen VBA-Kenntnissen leider nicht lösen kann.
In der angehängten Datei sind zwei WS, die zum einen den IST-Zustand nach dem Herunterladen aus SAP/PCA aufzeigt und zum anderen den SOLL-Zustand, wie ich mir die Auflistung nachher vorstelle (ohne Farbe, die ist nur zur Verdeutlichung).
Die 7-stelligen Zahlen sind Kostenarten, die 6-stelligen sind die Kostenstellen.
Folgendes möchte ich gerne erreichen:
Zunächst soll eine Spalte neben die Spalte A eingefügt werden.
Das Makro sollte dann die Spalte B durchsuchen, bis eine 6-stellige Zahl gefunden wird. Diese Zahl soll in die soeben eingefügte Spalte A eingefügt werden und zwar neben die 7-stelligen Zahlen, die vor der gefundenen 6-stelligen stehen (Excel muß also bei der Suche die Zeilen mitzählen, bis die 6-stellige Zahl gefunden wird). Dann soll die Zeile mit der 6-stelligen Zahl gelöscht werden und die Suche nach der nächsten 6-stelligen geht weiter.
Ich hoffe, daß ich mich verständlich ausgedrückt habe und Ihr mir mit Hilfe der beigefügten Datei weiterhelfen könnt.
Vorab schon einmal vielen Dank für Eure Hilfe.
Gruß
Torsten
https://www.herber.de/bbs/user/13500.xls