ich möchte in einer Excel Tabelle diese Zeilen Löschen,
in deren "Spalte E" ein "A" steht.
Dieses sollte ein Makro ausführen (VBA)
kann mir jemand weiterhelfen
Gruß M.Gottschalk
Sub M_Gottschalk()
Dim i As Long, laR As Long
Application.ScreenUpdating = False
laR = Cells(Rows.Count, 5).End(xlUp).Row
For i = laR To 1 Step -1
If Cells(i, 5).Value = "A" Then
Rows(i).Delete
End If
Next i
Application.ScreenUpdating = True
End Sub
Sub Zeile_löschen()
for i = x to y 'für x und y Zeilen-Anfang und -Ende der Spalte eintragen
if activesheet.cells(i,5)="A" then
activesheet.rows(i).delete
i=i-1
end if
next i
End Sub
Sub löschen()
For i = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
On Error Resume Next
If Cells(i, 5).Value = "A" Then
Rows(i).Delete
End If
Next
End Sub