Hallo Forum,
ich stehe vor folgendem Problem/Aufgabe.
Ich möchte in beigefügter Beispieldatei das Tabellenblatt "Kum_GundV" durchsuchen nach Zahlenkolonnen bzw. Zahlenbereichen in den Spalten, die ungleich null sind.
Die Suche startet ab der Spalte L (Spalte 12) und ich möchte von Hand die Anzahl der Spalten angeben, die der Reihe nach von rechts nach links ab der Spalte L von oben nach unten durchsucht werden sollen.
Die Suche soll immer in der Zeile 11 einer Spalte von oben nach unten starten bis zur letzten Zeile, in der eine Zahl steht (im Beispiel stehen die letzten Zahlen in der Zeile 2510).
Es sollen die Zahlenbereiche gesucht und kopiert werden, die ungleich dem Wert null sind. Dabei spielt es keine Rolle, ob die Zahlenwerte größer oder kleiner als 0 sind.
Der Zahlenbereich beginnt immer, wenn eine gefundene Zahl größer oder kleiner als null ist und endet, sobald nach dem Zahlenbereich wieder ein Zellwert mit dem Wert 0 gefunden wird.
Diese gefundenen Zahlenbereiche sollen in das Tabellenblatt "Einzeln" ab der Zeile 12 in Zeilen transponiert und kopiert werden wie in der Beispieldatei gezeigt.
Hier habe ich die Zahlenbereiche der Spalte L (Spalte 12) und teilweise Spalte M (Spalte 13) manuell durchsucht, in die Zwischenablage kopiert und transponiert in die Zeilen des Tabellenblattes "Einzeln" eingefügt.
Ich vermute, dass man dies am ehesten mit einem Array löst, aber ich kenne mich mit Arrays nicht aus. Andere Lösungen sind natürlich auch willkommen.
Eine zusätzliche sehr wünschenswerte Optionwäre für mich: wenn in der letzten Zelle (im Beispiel Zeile 2510) einer Spalte ein Zahlenwert steht, der ungleich 0 ist, dann soll dieser letzte Zahlenbereich in der jeweiligen Spalte nicht in das Tabellenblatt "Einzeln" kopiert werden.
Hier ist die wichtige Beispieldatei
https://www.herber.de/bbs/user/146592.xlsx
Wie geht man so etwas an?
Besten Dank vorab an die Excel-Cracks, die so etwas mit vba programmieren können!
Bernd