ich möchte gerne bestimmte Zellen verketten.
Beispiel: Ab Zeile 5 (bis zum Ende) -> Spalte C bis E -> Ergebis soll in Spalte F stehen. Die einzellnen Zellen pro Zeile sollen durch ein , "Komma" getrennt werden.
Leider funkioniert mein Versuch nicht so richtig, wo hab ich da den Fehler?
Kann mir da wer helfen?
Danke und Gruß
Dirk
Dim str As String Dim i As Long Dim z As Long For z = 5 To .Cells(Rows.Count, 2).End(xlUp).Row For i = 3 To 5 str = str & .Cells(z, i).Value & ", " Next i .Cells(z, 6).Value = str Next z