wie kann ich Zeilen mit einem bestimmten Wert in Spalte A automatisch löschen.
Vielen Dank für dir Hilfe
Gruß
Konrad
Sub tt()
Dim i As Long
For i = Range("A65536").End(xlUp).Row To 1 Step -1
If Cells(i, 1) = 1 Then
Rows(i).Delete
End If
Next i
End Sub
Gruß aus dem Sauerland
Jens