Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1532to1536
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

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

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
AW: Zeile in bestimmten Bereich löschen
04.01.2017 18:12:35
Daniel
Danke Danke Danke...
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige