Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon rebusss vom 08.08.2020, 12:00 Options
In Excel oder access Zeilen zusammenführen mit gleichem Key
Hallo zusammen,
im Internet habe ich bereits gesucht aber nicht die Lösung für mein Problem gefunden.
Folgendes: Ich habe eine Excel Tabelle die wie folgt aussieht:
ID Text line no. text
50 001 tralalala
50 002 juhhuuu
50 003 jödelo
60 001 brumm
60 002 brabbb
usw.
Ich möchte es jetzt gerne irgendwie schaffen, daß eine Datei erstellt wird die am Ende so aussieht:
ID text
50 tralalala juhhuuu jödelo
60 brumm brabbb
Es gibt immer unterschiedlich viele text lines pro ID. Viele haben nur eine Text line, weitere haben 2 und andere eben mehr.
Hat irgendjemand eine Idee wie man so etwas lösen kann?
Vielen Dank
im Internet habe ich bereits gesucht aber nicht die Lösung für mein Problem gefunden.
Folgendes: Ich habe eine Excel Tabelle die wie folgt aussieht:
ID Text line no. text
50 001 tralalala
50 002 juhhuuu
50 003 jödelo
60 001 brumm
60 002 brabbb
usw.
Ich möchte es jetzt gerne irgendwie schaffen, daß eine Datei erstellt wird die am Ende so aussieht:
ID text
50 tralalala juhhuuu jödelo
60 brumm brabbb
Es gibt immer unterschiedlich viele text lines pro ID. Viele haben nur eine Text line, weitere haben 2 und andere eben mehr.
Hat irgendjemand eine Idee wie man so etwas lösen kann?
Vielen Dank
Antwort 1 von Saarbauer vom 10.08.2020, 17:13 Options
Hallo,
versuch es mal mit dem Makro in Excel
Gruß
Helmut
versuch es mal mit dem Makro in Excel
Sub Zusammenstellung()
Range("A1").Select
Vergleich = Range("A1").Value
i = 1
While IsEmpty(ActiveCell) = False
ActiveCell.Offset(1, 0).Select
If ActiveCell.Value = Vergleich Then
letzteSpalte = Range("IV" & i).End(xlToLeft).Column + 1
Cells(i, letzteSpalte).Value = Range("C" & i + 1).Value
Rows(i + 1).Delete
ActiveCell.Offset(-1, 0).Select
Else
i = i + 1
Vergleich = Range("A" & i).Value
End If
Wend
End SubGruß
Helmut
Ähnliche Themen
Zeilen zusammenführen
Gerritos 09.03.2007 - 111 Hits - 5 Antworten
Excel Tabellenblätter zusammenführen
tauchi 14.08.2007 - 182 Hits - 1 Antwort
Excel-Dateien zusammenführen
sharino 28.12.2007 - 646 Hits - 2 Antworten
Excel Tabellenblätter zusammenführen
Barzi81 06.01.2008 - 83 Hits - 3 Antworten
Bestimmte Zeilen neu zusammenführen
McZap 10.02.2008 - 64 Hits - 2 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
