Mehrere Zeilen teilweise zusammenfuehren

Bild

Betrifft: Mehrere Zeilen teilweise zusammenfuehren von: Mindjogger
Geschrieben am: 11.02.2005 18:55:19

Servus zusmmen,

ich habe ein Listenproblem. Eine Download liste hat mehrere fast gleiche Eintraege (Name, Email,...) aber verschiedene Artikel.

Wie kann ich nun eine Liste erstellen welche mir auflistet wer welche Artikel bekommen hat ?
Ein Auszug habe ich hier: https://www.herber.de/bbs/user/17878.xls

Noch mal als Text :
Bernhard, email1@mail.de, Datei 1
Bernhard, email1@mail.de, Datei 2
Stefan, email2@mail.de, Datei 1
Klaus, email3@mail.de, Datei 1
Klaus, email3@mail.de, Datei 3
Klaus, email3@mail.de, Datei 5

Als Ergebnis soll herauskommen:
Bernhard, email1@mail.de, Datei 1-Datei 2
Stefan, email2@mail.de, Datei 1
Klaus, email3@mail.de, Datei 1 - Datei 3 - Datei 5

Hat jemand eine Idee hierzu.

Vielen Dank


Bernhard Stillger

Bild


Betrifft: AW: Mehrere Zeilen teilweise zusammenfuehren von: Reinhard
Geschrieben am: 11.02.2005 19:15:04

Hi Bernhard,
was soll denn mit Leeroy geschehen, der hat 2 Emailadressen. Soll Leeroy in 2 zeilen oder in eine?
Gruß
Reinhard


Bild


Betrifft: AW: Mehrere Zeilen teilweise zusammenfuehren von: Bernhard Stillger
Geschrieben am: 11.02.2005 19:24:19


Servus Reinhard,

am besten pro Email die Liste bilden. Das ist eindeutiger als der Name - vermute ich.
Die Liste hat ca. 5600 Zeilen/Eintraege.

Also waere anhande des XLS die Liste wie folgt (Reihenfolge beliebig):
leeroy ting leemingbodey@yahoo.com.hk for Windows
None None 1@tin.com for Windows, PDF in English, Readme in English
jack li 123@pchome.com ja for Windows
Dai esminguo 20108009@sitna.com Ruf an for Windows - for Windows
qwerwer qerqwrf2r 332224@fadf.com for Windows - for Windows - PDF in English quick reference in English - Release and Installation Notes in English - Release and Installation Notes in English
Ana Castresellas a.casellas@restuform.es for Sgi IRIX - for Sgi IRIX - for Windows - for Windows PDF in English


Wobei auffaellt, das einige Eintraege doppelt sind. Kann man die ggf. herausfiltern ? Entweder gleich mit oder nachtraeglich ?

Danke fuer deine Hilfe

Bernhard Stillger


Bild


Betrifft: AW: Mehrere Zeilen teilweise zusammenfuehren von: Mindjogger
Geschrieben am: 11.02.2005 19:32:20

Ich habe einen Vorschlag wie es sein koennte hochgeladen :

https://www.herber.de/bbs/user/17884.xls


Bild


Betrifft: AW: Mehrere Zeilen teilweise zusammenfuehren von: Neuling will's auch wissen
Geschrieben am: 11.02.2005 20:03:20

Hallo,

das interessiert mich auch. Kann da jemand einen Tipp abgeben.

Gruss


Stefan


Bild


Betrifft: AW: Mehrere Zeilen teilweise zusammenfuehren von: Reinhard
Geschrieben am: 11.02.2005 20:34:03

Hi Bernhard,
habe was gebastelt:
https://www.herber.de/bbs/user/17889.xls
Deine Emailadressen stehen in D2:Dx, die Artikel in F2:Fx.
Der Code:
Sub ZeilenInSpalten()
Application.ScreenUpdating = False
letzte = Range("F65536").End(xlUp).Row
For n = letzte To 3 Step -1
    If Cells(n, 6) = Cells(n - 1, 6) And Cells(n, 4) = Cells(n - 1, 4) Then Rows(n).Delete
Next n
letzte = Range("F65536").End(xlUp).Row
For n = letzte To 3 Step -1
    While Cells(n, 4) = Cells(n - 1, 4)
        Cells(n - 1, 6) = Cells(n - 1, 6) & " ," & Cells(n, 6)
        Rows(n).Delete
        n = n - 1
    Wend
Next n
Application.ScreenUpdating = True
End Sub

Gruß
Reinhard


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Mehrere Zeilen teilweise zusammenfuehren"