Daten verschieben/transponieren (vertik.→horiz.)

Daten gruppenweise verschieben

Hinweis

Diese ist in erster Linie eine kurze aber hoffentlich hilfreiche Erklärung zu einem als Download angebotenen File. Falls Sie nicht über den Link in der Datei hierher gelangt sind, dann können Sie die Datei hier herunterladen.

▲ nach oben …

Anmerkungen zur Download-Datei

Mit schöner Regelmäßigkeit kommt in Foren oder auch von GMG-CC – Kunden die Anfrage, ob bei einer bestimmten Form des „Umschaufelns“ von Daten geholfen werden kann. Vor nicht so langer Zeit kam wieder eine gleichartige Anfrage in einem Forum und ich ergreife die Gelegenheit, einmal die (inhaltlichen) Forderungen zusammenzufassen und meine Lösung als Download zu präsentieren.

Im zuerst eingeblendeten Register Zielvorstellung erkennen Sie, wie das Ganze nach der Abarbeitung des Makros aussehen soll. Die Quelldaten liegen im rechten Teil der Tabelle, die ersten beiden Spalten sollen die umgeschichteten Zieldaten aufnehmen.

Hier geht es darum, dass in einer Quelldatei (Tabelle1) in 1 Spalte verschiedene Daten in Gruppen untereinander aufgelistet sind. Also: Die Daten in der entsprechenden Spalte bestehen aus Blöcken zu je n Zeilen. Angenommen e s sind 4er-Blöcke und der erste Wert steht in A2 dann wäre der erste „Datensatz“ A2:A5, der zweite A6:A9, und so weiter. Das Ziel ist es nun, jede dieser Datenblöcke in jeweils 1 Zeile eines anderen Blatt zu schreiben, also A1:D1, A2:D2, … Die Quelldaten sollen aus Gründen der möglichen Prüfung nicht gelöscht werden.

Eine sehr ähnliche Aufgabe, allerdings mit ursprünglich horizontaler Anordnung der Daten sehen Sie hier. Es kann sich lohnen, auch dort einmal nachzuschauen, da teilweise andere Lösungsansätze verfolgt wurden. Und auch hier können Sie fündig werden.

▲ nach oben …

 

Dieser Beitrag wurde unter Downloads, Mit VBA/Makro, Tabelle und Zelle abgelegt und mit , , , , , verschlagwortet. Setze ein Lesezeichen auf den Permalink.