Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1380to1384
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
Inhaltsverzeichnis

Autofilter auf mehreren Blättern setzen / abschalt

Autofilter auf mehreren Blättern setzen / abschalt
13.09.2014 19:42:42
Frank Tesch

Hallo,
ich habe eine Arbeitsmappe mit ca. 20 Blättern.
Nun möchte ich mit einem Makro auf allen Blättern den Autofilter ab der Reihe A2 für alle Blätter einschalten und mit einem anderen Makro wieder ausschalten.
Welcher Experte kann helfen?
MfG
Frank

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Autofilter auf mehreren Blättern setzen / abschalt
13.09.2014 19:55:18
Hajo_Zi
Hallo Frank,
Option Explicit
Sub AutofilterEin()
Dim WsTabelle As Worksheet
For Each WsTabelle In Sheets
If Not WsTabelle.AutoFilterMode = True Then WsTabelle.Range("A2").Autofilter
Next WsTabelle
End Sub
Sub AutofilterAus()
Dim WsTabelle As Worksheet
For Each WsTabelle In Sheets
If WsTabelle.AutoFilterMode = True Then WsTabelle.Range("A2").Autofilter
Next WsTabelle
End Sub

Anzeige

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige