@Rudi Maintaire
gh
kannst du mir noch einmal helfen? wie muss ich den makro-code ändern, wenn ich mehrere zeilen oder auch spalten habe? kann man das schon so vorbereiten, dass ich den code nie ändern muss (zum beispiel bis zeile 1000)?
vielen, vielen dank im voraus!
glg
Sub tt()
Dim i As Long, j As Long, k As Long
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
For j = 2 To Cells(Rows.Count, 2).End(xlUp).Row
For k = 2 To Cells(Rows.Count, 3).End(xlUp).Row
Cells(Rows.Count, 4).End(xlUp).Offset(1) = _
Cells(i, 1) & Cells(j, 2) & Cells(k, 3)
Next k
Next j
Next i
End Sub