Ich verwende derzeit den folgenden Code, um Zellendaten in Spalte C einen Zeilenumbruch hinzuzufügen und in Spalte K zu kopieren. Ich muss Zeilenumbrüche auf einen Datenbereich anwenden. Ich habe 1000 Datenzeilen in Spalte C. Jede Hilfe wird sehr geschätzt.

Sub Macro
    Dim Stem As Variant
    Stem = ThisWorkbook.Worksheets ("Sheet1").Range("C2")
    Range ("K2").Select
    Range("K2").FormulaR1C1 = Stem & Chr(10) & ""
End Sub

Vielen Dan