Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Leerzeilen löschen

Leerzeilen löschen
11.01.2015 01:46:57
Dom-Kam
Hallo ich möchte per makro leerzeilen löschen, das geht auch gut aber ich möchte das dieses nur von spalte A bis H passiert. Mit dem makro was ich raus gesucht habe löscht er auch alle Leerzeilen der Spalten die über H hinausgehen.
Dim lngLetzte As Long
Dim lngZeile As Long
Application.ScreenUpdating = False
lngLetzte = IIf(IsEmpty(Range("B65536")), Range("B65536").End(xlUp).Row + 1, 65536)
For lngZeile = lngLetzte To 13 Step -1
If Cells(lngZeile, 2) = "" Then
Cells(lngZeile, 2).EntireRow.Delete
End If
Next
Application.ScreenUpdating = True

Anzeige

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

Betreff
Datum
Anwender
Anzeige
Ja, weil da '...EntireRow...' steht, ...
11.01.2015 02:15:42
Luc:-?
…Dom-Kam;
schreibe: Cells(lngZeile, 1).Resize(1, 8).Delete xlShiftUp
Morrn, Luc :-?

AW: Leerzeilen löschen
11.01.2015 22:41:57
Dom-Kam
ok geht, aber ich möchte gerne das er in tab1 das makro ausführt und in tab2 soll es ausgelöst werden.

AW: Leerzeilen löschen
11.01.2015 23:12:04
Daniel
HI
schreibe einfach vor jedes Cells oder Range den Tabellenblattnamen:
Sheets("Tab1").Range("B65536")
Gruß Daniel
Anzeige
;

Forumthreads zu verwandten Themen

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