Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Löschen zwischen zwei Definierten Zellen

Löschen zwischen zwei Definierten Zellen
14.08.2018 14:14:12
Benjamin
Ich habe zwei Zellen definiert mit dem Namen StarPoint und StopPoint.
Ich möchte nun alle dazwischen liegenden Zeilen mit Hilfe eines Makros löschen, aber diese zwei Zeilen nicht
Geht das irgendwie?
- Benjamin
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Löschen zwischen zwei Definierten Zellen
14.08.2018 14:38:05
Hajo_Zi
Hallo Benjamin,
Option Explicit
Sub Loeschen()
Range(Range("StarPoint"), Range("StopPoint")).ClearContents
End Sub

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
AW: Löschen zwischen zwei Definierten Zellen
14.08.2018 14:47:13
Benjamin
Hallo Hajo,
Danke für die Antwort...
Mein Code sieht jetzt so aus:
Option Explicit
Sub SubM2()
Range(Range("StartPoint"), Range("StopPoint")).EntireRow.Delete
End Sub
Jedoch wird der StopPoint auch gelöscht... ist das irgendwie umgehbar?
- Benjamin
Anzeige
AW: Löschen zwischen zwei Definierten Zellen
14.08.2018 14:55:59
Robert
Hallo Benjamin,
nachstehendes Makro löscht die Zeilen zwischen den benannten Bereichen StarPoint und StopPoint ohne die Zeilen mit diesen Namen. Dabei muss sichergestellt sein, dass StarPoint oberhalb von StopPoint ist. Kann es auch umgekehrt sein (StarPoint z. B. in B20 und StopPoint in D15) müsste das Makro geändert werden.
Sub ZeilenLoeschen()
If Range("StarPoint").Row 
Gruß
Robert
Anzeige
AW: Löschen zwischen zwei Definierten Zellen
14.08.2018 14:57:34
Hajo_Zi
Hallo Benjamin,
Aufgabe wohl falsch verstanden.
Option Explicit
Sub Loeschen()
Range(Range("StarPoint").Offset(0, 1), Range("StopPoint").Offset(0, -1)).ClearContents
End Sub

Gruß Hajo
Anzeige
Danke für die Hilfe
14.08.2018 15:02:26
Benjamin
- Benjamin
AW: Löschen zwischen zwei Definierten Zellen
14.08.2018 14:58:19
Daniel
Hi
wenn Start- und StopPoint als Excelnamen definiert sind und du weißt, welcher oben und welcher unten liegt: ist:
Range(Range("StartPoint").Offset(1, 0), Range("StopPoint").Offset(-1, 0)).EntireRow.Delete
Gruß Daniel
AW: Löschen zwischen zwei Definierten Zellen
14.08.2018 15:06:06
Daniel
HI
wenn nicht bekannt ist, welcher Punkt oben und welcher unten liegt:
Range.(Rows(Worksheetfunction.Min(Range("StartPoint").Row, range("StopPoint").Row)+1):Rows(Worksheetfunction.Max(Range("StartPoint").Row, range("StopPoint").Row)-1)).EntireRow.Delete
Gruß Daniel
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige