Hallo liebe Forumler,
ich stehe mal wieder auf dem Schlauch und bräuchte einen Ansatz von euch. Folgendes Szenario:
1. Ich habe ein Access-Export-Blatt in Excel. In Spalte A stehen IDs, die auch mehrfach vorkommen können. Die Werte sind aufsteigend sortiert. In Spalte B habe ich eine Hilfsspalte, die mir die doppelten Werte aus Spalte A nicht anzeigt, denn darauf basiert ein "Sheets.Add"-Makro (Das funktioniert auch tadellos). Die Werte in Spalte A sind nicht fortlaufend (z.B. 2, 2,6,8,13,13,13,13,18). Beim nächsten Export stehen nicht mehr zwingend dieselben Werte/IDs in Spalte A. Die Werte sind ab Zeile 2 eingetragen, da die erste die Überschriften enthält.
2. Nun ist es so, angenommen in Spalte A gibt es 12 verschiedene Werte in x Zeilen. Dann erzeuge ich 12 zusätzliche Sheets, die aufsteigend nummeriert benannt werden (1-12). Jetzt zum eigentlichen Problem.
Es sollen dann die einzelnen Werte in der Spalte A abgegrast werden und pro Wert die Zeile bis Spalte X auf ein Sheet kopiert werden.
Wie gehe ich nun hier am besten vor, da wie bereits erwähnt die Werte dynamisch sein werden. Ich stehe derzeit mächtig auf dem Schlauch und würde mich sehr freuen, wenn jemand von euch mir weiterhelfen könnte.
Mein bisheriger Ansatz war folgender:
1. Definiere eine dynamische Range mit den ausgelesenen aktuellen Werten aus Spalte A (um bei den obigen Werten zu bleiben, 2,6,8,13,18)
2. Suche mir aus dieser dynamischen Range die Werte in Spalte A.
3. bei jedem gefundenen Wert kopiere mir die Zeile von Spalte A bis X auf Sheet Y (bspw. Wert = 2 - Zeile 2 & 3 auf Sheet mit dem Namen "1", da 2 der erste Wert ist)
Habe auch schon andere Ansätze verfolgt, bin aber jedesmal daran hängengeblieben.
Ich danke euch vielmals im Voraus für den Support. Falls Ihr Code benötigen solltet, meldet euch bitte.
Grüße,
Heiko |