Wäre super dankbar!!!!
For c = 4 To 103
If Sheets("UG").Cells(c, 9).Value = "stetig" And Sheets("UG").Cells(c, 2).Value = "UG" Then
Do
o = o + 1
Loop Until IsEmpty(Sheets("Stetige Aufgaben").Cells(o, 7))
Rows(c).Copy Destination:=Sheets("Stetige Aufgaben").Cells(o, 1) Hier ist der Fehler!!!!!!!!
End If
Next c
Sheets("Stetige Aufgaben").Select
Sheets("Stetige Aufgaben").Cells(65536, 1).End(xlUp).Offset(1, 0).Select