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

Markierter Bereich - Zeilen löschen ausser die 1.

Forumthread: Markierter Bereich - Zeilen löschen ausser die 1.

Markierter Bereich - Zeilen löschen ausser die 1.
Stef@n
Hallo Excel-Freunde
ich bin auf der Suche nach einer Möglichkeit, bestimmte Zeilen zu löschen.
Ich markierte einen Bereich - z.B. b2..b8
Dann soll per Makro die Zeilen 2 bis 8 komplett gelöscht werden.
Wenn ich b12..b14 markierte - die Zeilen 13 und 14
Es sollen also alle ZEILEN - ohne die erste Zeile des markierten Bereiches - GELÖSCHT werden.
Kann man so etwas mit VBA realisieren ?
Freu mich auf einen Tip
Stef@n
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Markierter Bereich - Zeilen löschen ausser die 1.
24.01.2011 15:36:53
Gerold
Hallo Stef@n

Range(Cells(Selection.Row + 1, 1), Cells(Selection.Count + Selection.Row - 1, 1)) _
.EntireRow.Delete
Mfg Gerold
Rückmeldung wäre nett.
perfekt ! :) Danke ! OT
24.01.2011 15:43:07
Stef@n
warum markierts du dann die erste zelle?-owT
24.01.2011 16:24:35
robert
Anzeige

Forumthreads zu verwandten Themen

Markierter Bereich - Zellen löschen ausser die 1.
Stef@n

Hallo Excel-Freunde
ich bin auf der Suche nach einer Möglichkeit, bestimmte Zeilen zu löschen.
Ich markierte einen Bereich - z.B. b2..b8
Dann soll per Makro die Zeilen 2 bis 8 komplett gelöscht werden.
Wenn ich b12..b14 markierte - die Zeilen 13 und 14
Es sollen also all...
24.01.2011 15:06:42
Thread-ID: 1197055
3 Beiträge
Markierte Zeilen Verschieben und Löschen
WalterK

Zuerst wünsche ich ein gutes neues Jahr, Gesundheit und viel Erfolg.
Ich habe den nächst unteren Thread mit dem Code von Gerd L angesehen und auf mein Bespiel angelegt. Funktioniert soweit.
Allerdings wollte ich es so haben, dass auf jeden Fall die obersten 5 Zeilen nicht kopiert und ge...
01.01.2017 12:36:20
Thread-ID: 1532558
5 Beiträge
Kommentare von markierten Zellen löschen bei Inhalt ...
Peter
Hallo zusammen,

natürlich habe ich erst über eine Recherche probiert, das Problem zu lösen, leider erfolglos.
Problem: Bei einer Dokumentenübersicht als Excel- Tabelle muss ich quartalsweise Änderungen aufzeigen. Ich filtere die Spalte 'Status' nach z.B. 'G', 'N', 'A' (G = Geändert, N =...
29.09.2023 11:13:10
Thread-ID: 1947788
5 Beiträge
Anzeige
markierte Zellen Inhalte löschen (Formeln, Dropdown bleiben)
hockeyfreak
Hallo zusammen,

hoffe ihr könnt ihr helfen, meine Recherche war leider erfolgslos... :/

Habe eine Tabelle mit Formeln, Dropdowns und Zellen zum Befüllen. Nun möchte ich via VBA ein Makro mit folgender Funktion:
- man markiert die ganze(n) Zeile(n)
- gelöscht werden nur d...
23.10.2023 13:35:40
Thread-ID: 1950602
9 Beiträge
markierte Zeilen Inhalte löschen (Formeln, Dropdown bleiben)
hockeyfreak
Hallo zusammen,

ich habe einen VBA Code zum Löschen einer ausgewählten Zeile. Funktioniert auch super, jedoch funktioniert das Marko auch, wenn man nur eine einzelne Zelle auswählt. Dann wird nicht nur die Zelle, sondern das Tabellenblatt gelöscht. Das gleicht einer Katastrophe.
Hat j...
31.10.2024 12:52:17
Thread-ID: 1995248
3 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Markierten Bereich - Zeilen löschen außer der ersten Zeile

Schritt-für-Schritt-Anleitung

Um in Excel alle Zeilen eines markierten Bereichs zu löschen, außer der ersten Zeile, kannst Du ein einfaches VBA-Makro verwenden. Folge diesen Schritten:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Kopiere den folgenden VBA-Code in das Modul:

    Sub ZeilenLoeschenAußerErste()
    Range(Cells(Selection.Row + 1, 1), Cells(Selection.Row + Selection.Count - 1, 1)).EntireRow.Delete
End Sub

  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Markiere den gewünschten Bereich, z.B. von B2 bis B8.

  6. Drücke ALT + F8, wähle ZeilenLoeschenAußerErste und klicke auf Ausführen.

Damit werden alle Zeilen in Deinem markierten Bereich gelöscht, außer der ersten Zeile.

Häufige Fehler und Lösungen

  • Fehler: "Laufzeitfehler 1004"

    • Lösung: Stelle sicher, dass der Bereich, den Du markierst, mehr als eine Zeile enthält, da das Makro die erste Zeile der Auswahl benötigt, um die anderen zu löschen.

  • Fehler: Nichts passiert nach dem Ausführen des Makros

    • Lösung: Überprüfe, ob Du den richtigen Bereich markiert hast. Das Makro funktioniert nur, wenn der markierte Bereich mindestens zwei Zeilen hat.

Alternative Methoden

Wenn Du kein VBA verwenden möchtest, kannst Du auch eine manuelle Methode anwenden:

  1. Markiere den gesamten Bereich, den Du löschen möchtest, einschließlich der ersten Zeile.
  2. Klicke mit der rechten Maustaste und wähle Zellen löschen.
  3. Wähle die Option Ganze Zeile und klicke auf OK.
  4. Jetzt kannst Du die erste Zeile erneut hinzufügen oder die verbleibenden Zeilen anpassen.

Praktische Beispiele

  • Beispiel 1: Angenommen, Du hast Daten in den Zellen B2 bis B10. Wenn Du diesen Bereich markierst und das Makro ausführst, bleiben nur die Daten in B2 erhalten und alle anderen Zeilen (B3 bis B10) werden gelöscht.

  • Beispiel 2: Wenn Du die Zellen B12 bis B14 markierst, wird nach dem Ausführen des Makros nur die Zeile B12 erhalten bleiben, während B13 und B14 gelöscht werden.

Tipps für Profis

  • Verwende die Debug.Print-Anweisung im VBA-Code, um den Status von Variablen während der Ausführung zu überprüfen, falls Du Fehler finden möchtest.
  • Du kannst das Makro anpassen, um auch bestimmte Bedingungen einzufügen, wie z.B. nur leere Zeilen zu löschen oder bestimmte Werte zu überprüfen, bevor Du sie löschst.

FAQ: Häufige Fragen

1. Kann ich das Makro auf andere Zellen anwenden?
Ja, Du kannst das Makro auf jeden markierten Bereich anwenden, solange Du sicherstellst, dass der Bereich mehr als eine Zeile umfasst.

2. Funktioniert das Makro in jeder Excel-Version?
Das Makro sollte in den meisten modernen Excel-Versionen funktionieren, die VBA unterstützen, einschließlich Excel 2010 und neuer.

Beliebteste Forumthreads (12 Monate)

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