Fragen zu UDF, die Texte verkettet
29.01.2017 22:12:55
Christian
Hallo an euch alle,
habe mal 2 Fragen zu nachfolgender UDF und zwar
1. Gibt es eine Maximale Anzahl von Zellen, die ich mit dieser Formel miteinander verbinde oder kann der Bereich den ich angebe beliebig groß sein?
2. Gibt es eine Begrenzung, wieviele Zeichen die Ausgabe maximal haben kann von der Länge her?
Danke für eure Antwort
Christian
Function Verketten2(ByRef bereich As Range, Trennzeichen As String) As String
Dim rng As Range
For Each rng In bereich
If rng <> "" Then
Verketten2 = Verketten2 & rng & Trennzeichen
End If
Next
If Len(Verketten2) > 0 Then _
Verketten2 = Left(Verketten2, Len(Verketten2) - Len(Trennzeichen))
End Function