Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: Moi am Februar 17, 2019, 10:28:46 Vormittag

Titel: verketten mit automatik
Beitrag von: Moi am Februar 17, 2019, 10:28:46 Vormittag
ich suche nach einer Lösung wie ich einen Spalte mit jeweils einem Wort so verkette das er immer 5 Zeilen zusammenzieht. Aber das dann automatisch sodass ich eine Datei mit 170.000 Datensätzen zu jeweils 5 kombiniert zusammenfügen kann.

Leider habe ich dafür keine Lösung gefunden kann mir jemand helfen?
Ziel soll es sein die 170.000 Einzelzellen zu 34.000 zusammengesetzen Zeilen zu erstellen, wichtig dabei muss aber zwischen denn "Worten immer ein Leerzeichen sein.

=VERKETTEN(A1;", ";A2;", ";A3,", ";A4,", ";A5)

Müsste dann also zelle 1-5 , 6-10, 10-15 usw verketten

Vielen Dank ....
Titel: Antw: verketten mit automatik
Beitrag von: maninweb am Februar 18, 2019, 08:55:29 Vormittag
Hallo,

beispielhaft, Bereich usw. anpassen ...

Code: Visual Basic
  1. in D1 = 1
  2. in D2 = D1 + 1
  3. in D3 = AutoAusfüllen von D2 usw.
  4.  
  5. in E1 = INDEX($A$1:$A$170000;5*$D1-4;1)&", "&INDEX($A$1:$A$170000;5*$D1-3;1)&", "&INDEX($A$1:$A$170000;5*$D1-2;1)&", "&INDEX($A$1:$A$170000;5*$D1-1;1)&", "&INDEX($A$1:$A$170000;5*$D1;1)
  6. in E2 = INDEX($A$1:$A$170000;5*$D2-4;1)&", "&INDEX($A$1:$A$170000;5*$D2-3;1)&", "&INDEX($A$1:$A$170000;5*$D2-2;1)&", "&INDEX($A$1:$A$170000;5*$D2-1;1)&", "&INDEX($A$1:$A$170000;5*$D2;1)
  7. in E3 = AutoAusfüllen von E2 usw.
  8.  

Gruß
Titel: Antw: verketten mit automatik
Beitrag von: RPP63 am Februar 19, 2019, 06:40:25 Vormittag
Moin!
Falls Dein Excel 2016 TEXTVERKETTEN() kennt (Abo-Version), geht es auch erheblich einfacher:

Deine Wortliste in Spalte A ab Zeile 1
Ab B1: =TEXTVERKETTEN(", ";1;INDEX(A:A;ZEILE(A1)*5-4):INDEX(A:A;ZEILE(A1)*5))

Gruß Ralf
Titel: Antw: verketten mit automatik
Beitrag von: Moi am Februar 21, 2019, 07:24:54 Vormittag
Danke!  :)