auf der Zielgeraden ist noch ein Problem aufgetreten.
Ich möchte mit Hilfe einer Schleife eine Tabelle durchlaufen und alle Werte Meine Vorschläge hierfür:
Sub test()
Dim anfang As Integer
Dim ende As Integer
ende = Range("C655351").End(xlUp).Row
For anfang = 2 To ende
If Range("C" & anfang).Value
()bei dieser Variante wird nichts gelöscht.
Variante 2:
Dim loeschen As Range
Dim bereich As Range
Set bereich = Range("C:C")
For Each loeschen In bereich.Rows
If loeschen.Value Rows.Select
Selection.delete Shift:=xlUp
End If
Next loeschen
Hier wird scheinbar alles gelöscht.
Habt ihr Tipps für mich?
Vielen Dank + Viele Grüße