Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellbereich verketten

Forumthread: Zellbereich verketten

Zellbereich verketten
15.06.2007 13:47:36
Adem
Hallo Allerseits!
Ich möchte mehrere Zellen miteinander verketten. Die Formel Verketten umfasst bis zu dreißig Eingabemöglichkeiten.
Gibt es eine Formel, mit der auch ein Zellbereich verkettet werden kann? So wie die Summenformel (Beispiel Verketten (J2:j35;", ")
Beispiel J2:J40
In jeder Zelle steht ein Name. Ich möchte alle Zellen in einer Zelle haben, dabei sollen sie durch ein Komma und ein Leerzeichen getrennt werden.
Hat einer eine Idee?
Schöne Grüße aus Darmstadt
Adem

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellbereich verketten
15.06.2007 13:52:26
Rudi
Hallo,
in ein Modul:

Function BereichVerketten(Rng As Range, Optional strSpace As String) As String
'Verketten über Bereich
Dim c As Range
Application.Volatile
For Each c In Rng
BereichVerketten = BereichVerketten & c & strSpace
Next
BereichVerketten = Left(BereichVerketten, Len(BereichVerketten) - Len(strSpace))
End Function


In der Tabelle z.B.: =Bereichverketten(A1:A20;", ")
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

Anzeige
AW: Zellbereich verketten
15.06.2007 14:01:00
Adem
Hi Rudi,
vieln dank. Das klappt ja super. Ein Frage habe ich dennoch. Kann ich die Leerzellen überspringen, damit ich nicht zwei KOmmas und zewo Leerzeichen hintereinander habe?
Gruß
Adem

AW: Zellbereich verketten
15.06.2007 14:06:35
Rudi
Hallo,
natürlich.

Function BereichVerketten(Rng As Range, Optional strSpace As String) As String
'Verketten über Bereich
Dim c As Range
Application.Volatile
For Each c In Rng
If c  "" Then BereichVerketten = BereichVerketten & c & strSpace
Next
BereichVerketten = Left(BereichVerketten, Len(BereichVerketten) - Len(strSpace))
End Function


Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

Anzeige
AW: Zellbereich verketten
15.06.2007 14:48:00
Adem
Servus Rudi,
auch das klappt super!
Vielen Dank und ein schönes Wochenende
Adem
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige