Autofilter

Question

Hallo,
ich arbeite mit einer recht umfangreichen Exceltabelle. Aus dieser Tabelle holen sich diverse Kollegen Daten. Es ist der Autofilter eingerichtet und jeder filtert dann das raus was gerade gebraucht wird.
Die kleinen Pfeile in der obersten Zeile einer Spalte werden dann zwar blau, wenn nach dieser gefiltert wurde. Das ist aber leider nur schwer erkennbar. Gibt es eine Möglichkeit dies besser sichtbar zu machen?
Vielen Dank schon im voraus
mfg
Wolfgang H.

Answer 1

Hallo Wolfgang,

vieleich reicht es schon den Filter bei öffnen zurüczusetzen.
If .FilterMode Then .ShowAllData


Gruß Hajo

Answer 2

Hallo Hajo,
das ist sicher schon mal hilfreich. Wo gehört dieses Makro hin?
Und ist das alles oder braucht es auch noch Makroname? End?
mfg + vielen Dank schon mal
wolfgang H.

Answer 3

Halo Wolfgang,

es gehört unter DieseArbeitsmappe
Option Explicit

Private Sub Workbook_Open()
If Worksheets("Tabelle1").FilterMode Then Worksheets("Tabelle1").ShowAllData
End Sub

Gruß Hajo

Answer 4

Hallo Wolfgang,
vielleicht ist das die Lösung für den Autofilter

Gruß
fedjo

Answer 5

Hallo Hajo und fedjo,

vielen Dank für eure Lösungsvorschläge. Beides funktioniert.
Ich habe eben beide Lösungen ich einer Datei ausprobiert, dann wird aber Hajo´s Makro beim öffnen der Datei nicht ausgeführt. Wenn das möglich wird, dann wäre das die ideale Lösung.
Schon mal vielen Dank im voraus,
mfg
Wolfgang H.

Answer 6

Hallo Wolfgang,

ich sehe Deine Datei nicht und kann darum auch nichts dazu schreiben warum das Makro nicht ausgeführt wird.

Gruß Hajo

Answer 7

Hallo Wolfgang,
dann versuchs mal so: Autofilter

Gruß
fedjo

Answer 8

Hallo,
jetzt klappt alles wie gewünscht!!
Wolfgang H.