Filter zurücksetzen

Bild

Betrifft: Filter zurücksetzen
von: frager
Geschrieben am: 25.05.2015 19:55:05

Hallo,
vielleicht kann mir jemand bei folgendem Problem weiterhelfen.
Habe eine Excel Tabelle u.a. mit drei Spalten, in denen man jeweils filter setzen kann, um den gesuchten Punkt zu erhalten. Wenn ich die Datei speichere, schließe und wieder öffne, ist der zuletzt verwendete Filter weiterhin zu sehen. Man kann ihn nun händisch zurücksetzen.
Ich möchte, dass beim öffnen jeweils alle Daten angezeigt werden - also das die Filter jeweils beim schließen automatisch zurückgesetzt werden. Geht das? Hat jemand eine Idee?
Vielen Dank!

Bild

Betrifft: AW: Filter zurücksetzen
von: Sepp
Geschrieben am: 25.05.2015 19:59:19
Hallo?

' **********************************************************************
' Modul: DieseArbeitsmappe Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Private Sub Workbook_Open()
  Dim objSh As Worksheet
  
  For Each objSh In Me.Worksheets
    If objSh.FilterMode Then objSh.ShowAllData
  Next
End Sub


Gruß Sepp

Bild

Betrifft: AW: Filter zurücksetzen
von: frager
Geschrieben am: 25.05.2015 20:00:36
und wo muss ich das eingeben?

Bild

Betrifft: AW: Filter zurücksetzen
von: Sepp
Geschrieben am: 25.05.2015 20:03:24
Hallo?
steht doch da!
Modul: DieseArbeitsmappe
Gruß Sepp

Bild

Betrifft: AW: Filter zurücksetzen
von: frager
Geschrieben am: 25.05.2015 20:06:47
klappt nicht. beim öffnen bleibt der Filter

Bild

Betrifft: AW: Filter zurücksetzen
von: Sepp
Geschrieben am: 25.05.2015 20:09:21
Hallo?
glaub ich nicht, wenn du den Code an die richtige stelle kopiert hast.
Lade deine Datei hoch.
Gruß Sepp

Bild

Betrifft: AW: Filter zurücksetzen
von: frager
Geschrieben am: 25.05.2015 20:16:17
wahrscheinlich bin ich nicht im richtigen Bereich?
Habe VBA ausgewählt; einfügen; modul; reinkopiert; ohne Erfolg.
bin ich am falschen ort?
Hochladen geht wegen inhalt nicht :-(

Bild

Betrifft: AW: Filter zurücksetzen
von: Sepp
Geschrieben am: 25.05.2015 20:23:52
Hallo,
Userbild
Gruß Sepp

Bild

Betrifft: AW: Filter zurücksetzen
von: frager
Geschrieben am: 25.05.2015 20:26:57
Hallo Sepp,
es klappt jetzt!
Vielen Dank

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Filter zurücksetzen"