Zellen verbinden

Forumthread: Zellen verbinden
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Zellen verbinden

Zellen verbinden

25.09.2006 00:03:03

Fritz

Schönen Abend!
Ich denke meine Farge ist sicher schon beantwortet worden, kann aber leider nichts finden.
Ich würde eine formel oder einen VBA Code benötigen mit der ich alle zellen mit Inhalt der zeile 1 beginnend bei Spalte c verketten kann wobei die einzelnen werte durch ein leerzeichen getrennt werden sollen.
danke
11

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Zellen verbinden

25.09.2006 01:02:12

fcs

AW: Zellen verbinden

25.09.2006 01:02:12

fcs

Hallo Fritz,
die folgende benutzerdefinierte Funktion führt eine solche Textverkettung durch. Die Funktion muss du im VBA-Editor in ein Modul der Datei kopieren.
In der Tabelle gibst du dann z.B. folgende Formel ein:


=VerkettenText(C1:IV1)

Gruss
Franz


Function VerkettenText(Bereich As Range) As String
'Verkettet die Inhalte der Zellen von Bereich getrennt durch ein Leerzeichen
Dim Zelle As Range
For Each Zelle In Bereich
If Zelle.Value <> "" Then
If VerkettenText = "" Then
VerkettenText = Zelle.Value
Else
VerkettenText = VerkettenText & " " & Zelle.Value
End If
End If
Next Zelle
End Function