Autofilter abfragen

• Autofilter abfragen von rainer vom 09.10.2003 16:03:39
  • AW: Autofilter abfragen - von xXx am 09.10.2003 16:25:48
  • AW: Autofilter abfragen - von Karl-Otto Reimann am 09.10.2003 17:07:26

Betrifft: Autofilter abfragen
von: rainer
Geschrieben am: 09.10.2003 16:03:39
Hallo! Ich suche nach einer Möglichkeit per VBA, festzustellen, ob in Zeile 6 ein Autofilter aktiv ist.
Wenn ja, muß ich ihn in meinem Makro ausschalten.
Könnt ihr mir weiterhelfen?

Danke schon mal
Gruß
Rainer

Betrifft: AW: Autofilter abfragen
von: xXx
Geschrieben am: 09.10.2003 16:25:48
Hallo,
nur Zeilen 6? Geht glaub ich nicht. Nur feststellen ob das Blatt gefiltert ist und Filter abschalten:

If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!

Betrifft: AW: Autofilter abfragen
von: Karl-Otto Reimann
Geschrieben am: 09.10.2003 17:07:26
Hallo Rainer

Sub Filter()
Sheets("Tabelle1").Rows("6:6").AutoFilter
End Sub

Ist der Filter eingeschaltet, wird er ausgeschaltet und umgekehrt.
mfG KO

Excel-Beispiele zum Thema " Autofilter abfragen"
Autofilter auch mit Ziffern von Zahlen	Zellenwert als Autofilter-Kriterienwert
AutoFilter über mehrere Arbeitsblätter setzen	Kopfzelle mit aktivem Autofilter markieren
Nur die sichtbaren Zellen eines AutoFilter-Bereiches einlesen	Anzahl der durch Autofilter ermittelten Datensätze anzeigen
Autofilter-Kriterien über UserForm vorgeben	Makroaufruf bei Betätigung des Autofilters
Autofilter-Kriterien nach dem Filtern anzeigen	Kopfzeile einer Autofilter-Tabelle gelb hinterlegen