HERBERS Excel-Forum - das Archiv
Thema: VBA - Splitten von Daten in mehrere Tabellen
-
AW: Noch etwasKlausF
VBA - Splitten von Daten in mehrere Tabellen
Daten
Hallo allerseits,
folgende Ausgangssituation: ich habe ein Tabellenblatt mit vielen Buchungssätzen (ca. 5.000), einer pro Zeile. In Zeile A stehen die Spaltenüberschriften. In Spalte F stehen die Kostenträger der einzelnen Buchungen, 7-9 verschiedene gibt es für alle Buchungen, die auch nach diesem gruppiert sind.
Diese vereinfachte Beispieldatei zeigt, wo ich hin möchte:
https://www.herber.de/bbs/user/101965.xlsm
Ausgehend vom Tabellenblatt "Quelle", sollen je nach Kostenträger mittels eines Makros Tabellenblätter erstellt werden, auf welchen die Buchungssätze je nach Kostenträger zu finden sind.
Ist das irgendwie möglich?
Ansonsten, euch allen einen schönen Nachmittag.
Gruß
Josef
AW: VBA - Splitten von Daten in mehrere Tabellen
Daten
AW: VBA - Splitten von Daten in mehrere Tabellen
Daten
Ein Traum!
Vielen Dank, Klaus!
AW: Noch etwas
KlausF
Hallo Josef,
danke für die Rückmeldung.
Falls Du die Namen der neuen Tabellen ohne die vorangestellten 111 haben möchtest,
dann ändere diese Zeile
ActiveSheet.Name = rngRange.Cells(lngRow, 6)
in
ActiveSheet.Name = Right(rngRange.Cells(lngRow, 6), 2)
Das Makro löscht übrigens vor Ausführung immer alle Tabellen der Mappe mit Ausnahme des Blattes "Quelle!
Also vorsichtig, falls noch andere Blätter in der Mappe sind, die nicht gelöscht werden sollen ...
Gruß
Klaus
VBA - Splitten von Daten in mehrere Tabellen
Daten
Hallo allerseits,
folgende Ausgangssituation: ich habe ein Tabellenblatt mit vielen Buchungssätzen (ca. 5.000), einer pro Zeile. In Zeile A stehen die Spaltenüberschriften. In Spalte F stehen die Kostenträger der einzelnen Buchungen, 7-9 verschiedene gibt es für alle Buchungen, die auch nach diesem gruppiert sind.
Diese vereinfachte Beispieldatei zeigt, wo ich hin möchte:
https://www.herber.de/bbs/user/101965.xlsm
Ausgehend vom Tabellenblatt "Quelle", sollen je nach Kostenträger mittels eines Makros Tabellenblätter erstellt werden, auf welchen die Buchungssätze je nach Kostenträger zu finden sind.
Ist das irgendwie möglich?
Ansonsten, euch allen einen schönen Nachmittag.
Gruß
Josef
AW: VBA - Splitten von Daten in mehrere Tabellen
Daten
AW: VBA - Splitten von Daten in mehrere Tabellen
Daten
Ein Traum!
Vielen Dank, Klaus!
AW: Noch etwas
KlausF
Hallo Josef,
danke für die Rückmeldung.
Falls Du die Namen der neuen Tabellen ohne die vorangestellten 111 haben möchtest,
dann ändere diese Zeile
ActiveSheet.Name = rngRange.Cells(lngRow, 6)
in
ActiveSheet.Name = Right(rngRange.Cells(lngRow, 6), 2)
Das Makro löscht übrigens vor Ausführung immer alle Tabellen der Mappe mit Ausnahme des Blattes "Quelle!
Also vorsichtig, falls noch andere Blätter in der Mappe sind, die nicht gelöscht werden sollen ...
Gruß
Klaus
Excel-Beispiele