Hallo Vanessa,

ich nehme mal an, daß du nicht den ganzen Bereich z.B. (C7:Cn) mit dem gleichen Wert beschreiben möchtest?

Dann solltest du zunächst die nächste Zeile ermitteln, ähnlich wie hier, und dann kannst du deine Werte kopieren:

  With Sheets("UPLOAD IREP")
    
    ' nächste freie Zeile
    nextRow = IIf(IsEmpty(.Range("C7")), .Range("C7"), .Cells(Rows.Count, "C").End(xlUp)(2)).Row
 
    ' Werte kopieren
    .Range("C" & nextRow).Value = Left(Sheets("Read me").Range("E9").Value, 6)
    .Range("D" & nextRow).Value = Sheets("Read me").Range("E9").Value

    ' usw.
  End With