Ich möchte nun alle dazwischen liegenden Zeilen mit Hilfe eines Makros löschen, aber diese zwei Zeilen nicht
Geht das irgendwie?
- Benjamin
Option Explicit
Sub SubM2()
Range(Range("StartPoint"), Range("StopPoint")).EntireRow.Delete
End Sub
Jedoch wird der StopPoint auch gelöscht... ist das irgendwie umgehbar?Sub ZeilenLoeschen()
If Range("StarPoint").Row
GrußOption Explicit
Sub Loeschen()
Range(Range("StarPoint").Offset(0, 1), Range("StopPoint").Offset(0, -1)).ClearContents
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen