Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
988to992
988to992
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Leerzeilen/spalten löschen

Forumthread: Leerzeilen/spalten löschen

Leerzeilen/spalten löschen
04.07.2008 10:42:24
David
Hallo zusammen.
Ich habe einen definierten Bereich von z. Bsp. A1 bis AA39. Da die Daten aus SAP kommen, gibt es in diesem Bereich einige Zeilen und Spalten, die komplett leer sind und die ich gern per VBA löschen würde.
Mir würde nur einfallen, in den Zeilen per For-Next Schleife jede Zelle einer Zeile auf Inhalt prüfen zu lassen und bei 'Zähler = leer' dann zu löschen, das Ganze dann für alle Spalten. Das halte ich aber für sehr umständlich und ich glaube, das geht bestimmt auch einfacher. Vielleicht kann mir da jemand einen Tip geben?
Danke.
Gruß
David

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Leerzeilen/spalten löschen
04.07.2008 11:02:42
Chris
Servus David,
so:

Sub lösche()
Dim i As Long
For i = 39 To 1 Step -1
If Application.WorksheetFunction.CountA(Range("A" & i & ":AA" & i)) = 0 Then Cells(i, 1). _
EntireRow.Delete
Next i
End Sub


CountA zählt die Einträge im angegebenen Range, wenn keine, dann = 0 und die Zeile ist leer. Sie wird gelöscht.
Gruß
Chris

Anzeige
AW: Leerzeilen/spalten löschen
04.07.2008 11:47:54
David
Funzt.
Mit einiger Bastelei hab ich's auch für die Spalten hinbekommen.
Danke dir.
Gruß
David

... closed ...
04.07.2008 11:48:32
David
;

Forumthreads zu verwandten Themen

Zwei Spalten in jeweils zwei Tabellen miteinander
Lutz

Liebe Leute,
ich habe zwei recht umfangreiche Tabellen mit Lieferdaten und dies in zwei von einander unabhängigen Tabellen.
In der Tabelle1 stehen neben anderen die Spalten Bestellnr. und Materialnr. sowie Lieferantennr. In der Tabelle2 stehen wiederum die Spalten Bestellnr. und Materia...
08.08.2008 15:56:55
Thread-ID: 1000336
4 Beiträge
Spaltenwerte ausgewählter Tabellen kopieren
obelix-xxl

Hallo,
in mehreren Tabellen habe ich in der gleichen Spalte X11:X100 Summenwerte eingetragen.
Die Spaltenbeschriftung ist in der Zelle X10 und ist gleich dem Tabellennamen, z.B. -1.234.
Zur weiteren Verwendung möchte ich nur die Ergebnisse der markierten Tabellenblätter in eine neu...
07.09.2008 08:42:00
Thread-ID: 1007926
2 Beiträge
Anzeige
Leerzeichen löschen in allen Tabellen und Zellen?
dieter(drummer)

Excel gut ist übertrieben!
Hi VBA Profis,
ich suche eine VBA Lösung, die in allen Zellen, in allen Tabellen der aktiven Arbeitsmappe, die NUR EIN LEERZEICHEN drin haben, das LEERZEICHEN löscht. Dann soll die Zelle leer sein.
Zellen, die einen anderen Inhalt haben, z. B. Text und Za...
13.03.2009 09:32:28
Thread-ID: 1059743
11 Beiträge
Zeilen nicht drucken, wenn Spalte leer oder 0
Berlenbach

Hallo,
ich habe ein Problem mit dem unten angegebenen und hier veröffentlichten Makro:
Sub Drucken() Dim iRowL As Integer, iRow As Integer iRowL = Cells(Rows.Count, 3).End(xlUp).Row For iRow = 1 To iRowL If IsEmpty(Cells(iRow, 3)) Or Cells(iRow, 3).Value = 0 Then Rows(iRow).Hidden = T...
01.04.2009 09:37:06
Thread-ID: 1065835
8 Beiträge
Spalten löschen bei Wert in 1 leer
Michael

Liebe Gemeinde,
wenn in Zeile 1 nicht der Wert x steht, wird die Spalte gelöscht.
Das funktioniert auch prima. Allerdings bedeutet das auch eine gewisse rechenzeit, da diese Aktion 255 mal ausgeführt wird.
so sieht es bisher aus:
....
range ("a1").select
For i = 1 To 255...
20.05.2009 08:55:29
Thread-ID: 1076217
6 Beiträge
Zeilen löschen wenn ...
Marion65

Hi zusammen,
habe eine Tabelle hochgeladen, mein Problem ist dort beschrieben.
Gruß Marion
https://www.herber.de/bbs/user/62707.xls
24.06.2009 04:57:02
Thread-ID: 1083974
8 Beiträge
Anzeige
Zeilen löschen wenn ...
Marion65

Hallo zusammen,
habe mein Problem in der Beispieldatei beschrieben. Für Eure Hilfe wäre ich Dankbar.
Gruß Marion
https://www.herber.de/bbs/user/62728.xls
Ps. Franz hatte mir schon ein Makro gebastelt, doch leider funktioniert es nicht richtig.
Sub BegriffSuchenZeilenLoesc...
24.06.2009 20:27:47
Thread-ID: 1084196
8 Beiträge
Anzeige
Zeile Löschen wenn aktuelle Spalte leer ist
Lutz

Hallo Excel-Spezialisten,
ich bekommen immer sehr umfangreiche Listen und muß nach bestimmten Kriterien löschen.
Ich bräuchte jetzt ein Makro, dass alle Zeilen löscht bei denen in der aktiven Spalte kein Eintrag ist - und eines, dass alle Spalten löscht bei denen in der aktuellen Zeile...
10.07.2009 21:58:59
Thread-ID: 1087780
4 Beiträge
Anzeige
Zeilen löschen, wenn in Spalte A nicht fett?
Selma

Hallo Leute,
ich möchte ab Zeile 1 bis Zeile 5000 folgende Zeilen löschen:
Wenn in Spalte A die Zelle leer ist, dann Zeile löschen
Wenn in Spalte A die Zelle gefüllt ist, aber nicht fett ist, dann die Zeile löschen.
Wie mache das per VBA ?
Besten Dank im Voraus !
VG,
...
28.07.2009 22:58:24
Thread-ID: 1092081
7 Beiträge
Zeile löschen, wenn in Zelle "40477E4-T" vorkommt?
Selma

Hallo Leute,
wenn in Spalte B in Zelle dies "40800E4-T" enthalten ist, dann soll die Zeile gelöscht werden.
Die letzte Zelle mit Inhalt kann in Spalte A ermittelt werden.
Wie mache ich das per VBA?
Besten Dank im Voraus!
Viele Grüße,
Selma
06.08.2009 09:44:46
Thread-ID: 1093925
11 Beiträge
Zeilen löschen wenn...
Lasse

Hallo,
ich habe eine Tabelle in der eine Spalte "Name" enthalten ist.
In dieser Tabelle möchte ich alle Zeilen löschen, in denen bei "Name" nicht ein Name von einer Liste mit 25 Personen steht.
Vielen Dank im Voraus,
Lasse
12.11.2009 11:11:17
Thread-ID: 1116419
16 Beiträge
Zeilen ausblenden, wenn Spalte leer
walter

Hallo,
In der hochgeladenen Datei, im Arbeitsblatt "Depositen Rechnungswesen" soll folgendes funktionieren:
Durch Drücken auf den Button "Selektion" sollen all jene Zeilen ausgeblendet werden, bei denen die Spalte "K" leer ist (zusätzlich wird auch der Blattschutz aktiviert).
Durch...
04.12.2009 07:56:16
Thread-ID: 1121748
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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