Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1532to1536
1532to1536
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeile in bestimmten Bereich löschen

Forumthread: Zeile in bestimmten Bereich löschen

Zeile in bestimmten Bereich löschen
04.01.2017 17:59:08
Daniel
Hallo zusammen,
ich hatte zuerst nur den Code "ActiveCell.EntireRow.Delete Shift:=xlUp".
Den wollte ich aber so umschreiben das der in einem Tabellenblatt nur in bestimmten Zeilen möglich ist, damit man nichts flasches löscht. Irgendwie bekomm ich das aber nicht hin :(
If ActiveCell.Rows("18:500") Then
ActiveCell.EntireRow.Delete Shift:=xlUp
Else
MsgBox "Diese Zeile kann nicht gelöscht werden!"
End If
Kann mir da einer weiterhelfen bei meinem Denkfehler. Vielen dank schon mal im Voraus.
Gruß
Daniel
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile in bestimmten Bereich löschen
04.01.2017 18:06:22
Hajo_Zi
Hallo Daniel,
If ActiveCell.Rows>=18 and ActiveCell.Rows
AW: Zeile in bestimmten Bereich löschen
04.01.2017 18:09:22
Matthias
Hi
 If ActiveCell.Row >= 18 And ActiveCell.Row
Gruß Matthias
AW: Zeile in bestimmten Bereich löschen
04.01.2017 18:10:03
Daniel
Hi
so 
If ActiveCell.Row >=18 AND ActiveCell.Row

oder so: 
If Intersect(ActiveCell, Range("18:500")) is Nothing then
Msgbox "Diese Zeile kann nicht gelöscht werden"
Else
ActiveCell.EntireRow.Delete
End If
Gruß Daniel
Anzeige
AW: Zeile in bestimmten Bereich löschen
04.01.2017 18:12:35
Daniel
Danke Danke Danke...

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige