Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
832to836
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
832to836
832to836
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Schleife für gefilterte Daten

Schleife für gefilterte Daten
03.01.2007 15:10:54
Bernd
Hallo zusammen
Ich habe ein Makro geschrieben in dem erst mehrere Filter gesetzt werden, und dann anschliesend die Zeilen mit einer for-Schleife durchlaufen und verarbeitet werden.
Das Ganze sieht grob so aus:
For irow = 2 To Cells(65536, 1).End(xlUp).Row
If ActiveSheet.Rows(irow).Hidden = False Then
'hier würde der eigentliche Code stehen
end if
next irow
Das funktioniert zwar, ich frage mich aber ob man das nicht auch besser machen kann. Anstatt alle Zeilen mit der for-Schleife zu durchlaufen und dann erst zu prüfen ob die Zeile auch visible ist, eine Schleife die nur die sichtbaren Zeilen durchläuft.
Gruß Bernd

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

Betreff
Datum
Anwender
Anzeige
AW: Schleife für gefilterte Daten
03.01.2007 15:16:20
Ali
Hi,

Sub sichtbare()
Dim c As Range
For Each c In Columns("A:A").SpecialCells(12)
'mach was
Next
End Sub

mfg Ali
AW: Schleife für gefilterte Daten
03.01.2007 15:20:22
Cardexperte
Hallo Bernd,
was hält dich davon ab, den Spezialfilter zu nehmen (nicht den Autofilter), den Bereich dann irgendwohin zu kopieren und dann erst die Verarbeitung zu starten?
Spezialfilter ist doch viel komfortabler
Gruss WS
AW: Frage beantwortet
03.01.2007 15:38:44
Bernd
Hallo Ali + Cardexperte
Das hilft mir auf jedenfall schon mal weiter vielen Dank euch beiden
Gruß Bernd
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige