ich möchte immer eine Zelle löschen die mit 85 beginnt? Die Daten stehen in Spalte A, wie kann man so etwas realisieren?
Danke
Gruß
Matthias
Sub Loeschen_Links_85()
Dim rngDel As Range, lngRow As Long
Set rngDel = Cells(Rows.Count, Columns.Count)
For lngRow = 1 To Cells(Rows.Count, 1).End(xlUp).Row
If Left(Cells(lngRow, 1), 2) = "85" Then Set rngDel = Union(rngDel, Cells(lngRow, 1))
Next
rngDel.Delete
End Sub
Gruß Gerd
Sub Loeschen() ' löscht:
Range("A5").Clear ' Formate + Inhalt
Range("A3").ClearFormats ' Formate
Range("A4").ClearContents ' Inhalt (Wert, Formel)
Range("A6").Delete ' komplette Zelle
End Sub
Im Excel-Menü findest du entsprechend unter "Bearbeiten":