Office: Zelleninhalt auf mehrere Zeilen und Spalten verteilen*

Hallo zusammen, ich hoffe, mir kann jemand mit diesem Thema helfen:

Ich habe eine recht große Tabelle, die ich mal vereinfacht habe. Der Plan ist, die Werte der Spalte D, die als Aufzählung da stehen, mit den entsprechenden Infos in die Zeile(n) darunter zu kopieren, ohne Daten zu überschreiben. Leider tauchen in der Tabelle an unterschiedlichsten Stellen solche Aufzählungen auf, so dass ich keine Ahnung habe, wie ich das nicht händisch umgesetzt bekomme. Danke:

Ausgangslage:




Ziel:




Beispielhaft ist mal die 3. Zeile markiert, ziel soll aber sein, alle Werte in der Tabelle so zu trennen. Danke Euch

:)

 

Hi,

welche Excelversion hast Du im Einsatz?
Ggf. ist es ohne VBA, aber mit Power Query, wartbarer für Dich.

So oder so hilft ein Beispielfile - egal welche Technik letztendlich angewendet wird.

 

Hallo,

mit Power Query sind dies nur wenige Mausklicks!

 

Da war aber jemand voller Tatendrang *wink.gif*

 

Hallo Marco,

dazu habe ich alles in allem wohl gerade mal 3 Minuten benötigt. Insofern, war da nicht sonderlich viel Tatendrang notwendig. Mir geht es dabei eher um die Info, das tatsächlich zu sehr vielen Fragestellungen mit Power Query recht einfach Lösungen erstellt werden können, da ja vieles einfach nur zusammengeklickt werden muss.

Habe ich aber keinen Plan, von dem was ich will/benötige, dann ist es egal, ob ich es mit Formeln, Power Query oder VBA versuche, das Ziel werde ich dann meist nicht erreichen.

 

G1: 0
G2[:G9999]: =ANZAHL(H2:M2)+G1
H2[:M9999]: =--GLÄTTEN(TEIL(WECHSELN($D2;" ";WIEDERHOLEN(" ";199));SPALTE(A2)*199-198;199))

O2[:O9999]: =O1*(P2=P1)+1
P2[:S9999]: =INDEX(B$2:B$9999;VERGLEICH(ZEILE(P1)-1;$G:$G))
R2[:R9999]: =INDEX(H$2:M$9999;VERGLEICH(ZEILE(R1)-1;$G:$G);O2)

Achtung: R:R wird durch die letzte Formel überschrieben!
Das Ausgliedern von VERGLEICH habe ich mir geschenkt; wäre effizienter, aber auch eine weitere Hilfsspalte.
Falls mehr als 6 Verkettungen in D möglich, müssen vor M Spalten eingefügt und die Formel dann noch mal ausgefüllt werden.

 

Bin bei Dir.
An Deine Beispieltabelle angelehnt benötige Ich (als Hobby-VBAler) rund 20minuten, wobei keine Fehlerbehandlung stattfindet.

Code:

 

Wow, das ist fantastisch. Danke. sorry, dass ich erst jetzt antworte, ich hatte Dank Corona sehr viel Freizeit und daher auch nichts mit Excel zu tun *wink.gif*