Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1944to1948
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1944to1948
1944to1948
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Leere Zeilen in einem bestimmten Bereich löschen VBA

Leere Zeilen in einem bestimmten Bereich löschen VBA
28.09.2023 10:44:15
Tom
Hallo zusammen,

wie kann ich in einem bestimmten Bereich (A6:J700) die leeren Zeilen per VBA löschen?
Mit der Filterfunktion klappt es leider nicht, warum auch immer

Danke vorab

TOM

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

Betreff
Datum
Anwender
Anzeige
AW: Leere Zeilen in einem bestimmten Bereich löschen VBA
28.09.2023 10:48:52
snb 
Sub M_snb()

  range("A6:J700").specialcells(4).delete

End Sub
AW: Leere Zeilen in einem bestimmten Bereich löschen VBA
28.09.2023 10:59:23
JoWE
Hallo,
...er meinte doch aber Zeilen, oder?
Gruß
Jochen
AW: Leere Zeilen in einem bestimmten Bereich löschen VBA
28.09.2023 11:07:25
snb
Dann wäre sortieren die einfachste Methode:

AW: Leere Zeilen in einem bestimmten Bereich löschen VBA
28.09.2023 11:05:36
daniel
Hi
wann genau soll die Zeile gelöscht werden?
müssen dazu alle 10 Zellen einer Zeile im Bereich A:J leer sein oder reicht es aus, eine repräsentative Spalte zu prüfen.
wie hast du gefiltert, welchen Code hat du verwendet?
Was genau steht in den Zellen drin, wenn sie leer erscheinen? sind es echte Leerzellen oder enthalten sie eine Formel die "" ausgibt oder vielleicht sogar die 0, welche dann aber über Zahlenformat oder Einstellung ausgeblendet wird?

der Code von snb löscht im Bereich alle Zeilen, die in Spalte A-J eine oder mehr echte Leerzellen haben. Dh auch Zeilen, bei denen 9 Spalten gefüllt sind, werden gelöscht.

ein Code der nur Zeilen löscht wenn alle Zellen einer Zeile leer sind, sieht so aus. Die Spalte K müsste aber frei sein: 
with Range("K5:K70")

.formulaR1C1 = "=IF(CountA(RC1:RC10)=0,0,Row())"

.Cells(1, 1).value = 0

.EntireRow.RemoveDuplicates .Column, xlno

.Clearcontents

end with

Gruß Daniel
Anzeige

321 Forumthreads zu ähnlichen Themen

VBA: Zeile Löschen trotz Blattschutz
Mathias

Hallo zusammen!
Ich bräuchte nochmals Hilfe. Habe zwar einige Bausteine gefunden, aber alles nicht das, was ich will.
Ich habe in Excel mehrere Tabellenblätter.
Darin sind einzelne Spalten geschützt
Wenn ich über eine Userform-Formular etwas in die Excel-Tabelle eintragen möchte...
25.08.2009 12:02:31
Thread-ID: 1098366
5 Beiträge
Anzeige
Tabellenblätter mit Inhaltsverzeichnis löschen | Herbers Excel-Forum
Heinz
Hallo
Ich suche seit geraumer Zeit nach der Lösung folgenden Problems:
Ich arbeite mit einer Arbeitsmappe mit ca. 100 verschiedenen Tabellenblättern. Für jede Einzelarbeit brauche ich davon ca. 10-30 Blätter. Die nicht benötigten Blätter möchte ich mittels Makro am Ende löschen.
Mittels...
04.01.2010 18:33:06
Thread-ID: 1127121
6 Beiträge
Pivot VBA Tabellenblatt löschen
murat

Halllo,
ich möchte ein erzeugtes tabellenblatt, das durch pivot doppelklick entstanden ist wieder löschen.
ich habe folgendes Makro
Private Sub CommandButton1_Click() Dim letzteZelle As Long letzteZelle = Worksheets("Tabelle42").Cells.Find(What:="*", _ After:=[A1], SearchDirection:=...
24.01.2010 21:10:25
Thread-ID: 1132506
5 Beiträge
Anzeige
VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
Steffen

Hallo zusammen,
ich benötige kurz eure kompetente Hilfe!
Ich habe folgendes Problem....
Wenn in Zelle A5 in Mappe1 der Wert 0 steht dann soll die Zeile 9 in Mappe2 gelöscht werden.
Ich hoffen mir kann jemand weiterhelfen!
Vielen Dank für die Hilfe und einen Lieben Gruß
S...
04.09.2010 18:17:19
Thread-ID: 1175718
13 Beiträge
VBA schreiben zum Zeilen löschen
Ludwig

Hallo,
vielleicht weis einer was ich hier schreiben müsste?
siehe Anhang
https://www.herber.de/bbs/user/72108.xls
Danke im voraus
lg Ludwig
31.10.2010 18:51:40
Thread-ID: 1184622
7 Beiträge
VBA - zeilen aus liste löschen
susanne

Hallo,
ich bin nicht sonderlich fit in VBA und habe ein kleines problem.
Ich lasse aus einem arbeitsblatt zuerst die daten in ein weiteres blatt kopieren, dann sollen die zeilen gelöscht werden, in denen in der spalte 4 nichts (0) drinsteht. Das funktioniert mit dem skript unten auch. j...
11.11.2010 15:33:12
Thread-ID: 1186332
3 Beiträge
VBA Zeilen löschen beschleunigen
Frank

Hallo zusammen,
ich benutze folgenden Code, um Zeilen zu löschen, in deren Spalte "B" ein Wert steht, der in einer zuvor definierten Range auftaucht:
Sub cust_del() Application.ScreenUpdating = False Dim i As Integer Dim lz As Integer Worksheets("ergebnis").Activate lz = Range("A4").End...
29.03.2011 11:11:55
Thread-ID: 1208031
4 Beiträge
VBA: Zeilen mit Eintrag in Spalte B löschen
Martin

Guten Tag
Wie kann ich vermeiden beim untenstehende Code ein RC22 (hätte lieber ein Range oder Cells) einzugeben. Ich möchte, dass alle Zeilen mit Eintrag O oder P in Spalte B gelöscht werden.
Besten Dank im voraus.
Martin
'O und P löschen
With xxx.UsedRange
With .Colum...
13.04.2011 15:29:24
Thread-ID: 1210256
7 Beiträge
Anzeige

Links zu Excel-Dialogen

Frame
Anzeige

Infobox zum Thema

EXCEL - VBA: Leere Zeilen in einem bestimmten Bereich löschen

Inhaltsverzeichnis

Die Fragestellung

Du möchtest mit VBA in Excel alle leeren Zeilen in einem bestimmten Bereich löschen.

Erläuterung des Problems {#erläuterung-des-problems}

Leere Zeilen in einem Datensatz können die Analyse und Verarbeitung von Daten erschweren. In Excel kann das manuelle Entfernen von leeren Zeilen, besonders in großen Datensätzen, zeitaufwendig sein. Eine automatisierte Lösung mit VBA kann diesen Prozess beschleunigen.

Lösung des Problems {#lösung-des-problems}

Hier ist ein VBA-Code-Beispiel, das leere Zeilen in einem definierten Bereich löscht:

Sub LeereZeilenLoeschen()
    Dim Bereich As Range
    Dim i As Integer

    ' Definiere den Bereich, in dem gesucht werden soll
    ' Ändere "A1:C10" auf den gewünschten Bereich
    Set Bereich = ThisWorkbook.Sheets("Tabelle1").Range("A1:C10")

    ' Beginne von unten nach oben zu suchen, um das Löschen zu vereinfachen
    For i = Bereich.Rows.Count To 1 Step -1
        If WorksheetFunction.CountA(Bereich.Rows(i)) = 0 Then
            Bereich.Rows(i).Delete
        End If
    Next i
End Sub

Ersetze "Tabelle1" mit dem Namen deines Arbeitsblatts und passe den Bereich "A1:C10" entsprechend an.

Anwendungsbeispiele aus der Praxis

  • Datenbereinigung: Vor der Durchführung von Datenanalysen oder dem Import in andere Systeme.
  • Berichterstellung: Automatisches Entfernen von leeren Zeilen vor der Erstellung von Berichten.

Tipps

  • Es ist wichtig, von unten nach oben zu löschen, um zu verhindern, dass Zeilen übersprungen werden, wenn Zeilen gelöscht werden.
  • Stelle sicher, dass du vor der Ausführung des Skripts eine Kopie deiner Daten hast, um Datenverlust zu vermeiden.

Verwandte Themenbereiche

  • VBA-Programmierung
  • Automatisierung von Excel-Aufgaben
  • Datenmanagement

Zusammenfassung

Das Löschen von leeren Zeilen in einem bestimmten Bereich mit VBA in Excel kann die Datenbereinigung erheblich vereinfachen und beschleunigen. Der oben gezeigte Code kann angepasst und in jedes Excel-Projekt integriert werden, um repetitive Aufgaben zu automatisieren und die Datenqualität zu verbessern.

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
4
5
4
1
12
6
2
3
6
11
2
3
15
10
7
10
16
3
1
5
2
4
1
6