Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Daten gefiltert nicht löschen

Daten gefiltert nicht löschen
Markus
Hallo,
ich möchte in mein Add-In folgendes einbauen.
Das Makro soll bei einer gefilterten Datei (Autofilter on) alle Daten löschen die nicht gefiltert sind.
(Also die ausgeblendeten).
Ich muss vielmals in grossen Dateien solange etwas Bestimmtes brauchbares heurausfiltern.
Habe ich das, möchte ich per Makro den "Restmüll" löschen.
Markus
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Daten gefiltert nicht löschen
08.04.2012 19:11:47
Jens
Hallo
Evtl. so:
Sub tt()
Dim loletzte As Long
Dim lozeile As Long
loletzte = Range("A65536").End(xlUp).Row
For lozeile = loletzte To 1 Step -1
If Rows(lozeile).Hidden = True Then
Rows(lozeile).Delete
End If
Next
End Sub
?
Gruß Jens
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige