Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Mein_Pseudonym vom 06.07.2019, 20:01 Options
Aktive Filter in Excel erkennen (VBA)
Hallo zusammen,
wir nutzen bei der Arbeit eine xls-Datei gemeinsam. Immer wieder kommt es vor, dass jemand die Datei mit aktivem Filter abspeichert. Der nächste muss dann erst wieder den Filter deaktivieren / alle Daten anzeigen lassen.
Daher meine Frage: Wie kann ich erkennen erkennen, daß ein Filter aktiv ist, um dann per VBA beim Öffnen der Datei diesen zu deaktivieren?
Leider konnte ich hierzu nichts finden..
Für Eure Hilfe im voraus vielen Dank!
wir nutzen bei der Arbeit eine xls-Datei gemeinsam. Immer wieder kommt es vor, dass jemand die Datei mit aktivem Filter abspeichert. Der nächste muss dann erst wieder den Filter deaktivieren / alle Daten anzeigen lassen.
Daher meine Frage: Wie kann ich erkennen erkennen, daß ein Filter aktiv ist, um dann per VBA beim Öffnen der Datei diesen zu deaktivieren?
Leider konnte ich hierzu nichts finden..
Für Eure Hilfe im voraus vielen Dank!
Antwort 1 von Hajo_Zi vom 06.07.2019, 20:13 Options
Hallo Unbekannter,
Sub AlleFilterEntfernen()
With ActiveWorkbook.ActiveSheet
If .FilterMode Then
.ShowAllData
MsgBox "Es wurden alle Auto-Filter entfernt!", vbOKOnly, " Filter deaktiviert"
End If
End With
End Sub
Gruß Hajo
Sub AlleFilterEntfernen()
With ActiveWorkbook.ActiveSheet
If .FilterMode Then
.ShowAllData
MsgBox "Es wurden alle Auto-Filter entfernt!", vbOKOnly, " Filter deaktiviert"
End If
End With
End Sub
Gruß Hajo
Antwort 2 von Mein_Pseudonym vom 06.07.2019, 20:17 Options
Hallo Hajo,
vielen Dank! Das .FilterMode hatte ich gesucht!
Gruß Peter
vielen Dank! Das .FilterMode hatte ich gesucht!
Gruß Peter
Ähnliche Themen
Filter erstellen
Toni165 10.04.2007 - 361 Hits - 3 Antworten
Auf die zuletzt aktive Zelle zurückspringen
fedjo 12.12.2007 - 94 Hits - 3 Antworten
mehre Excel Arbeitsblaetter in PowerPoint via VBA ansprechen
sammille 12.03.2008 - 100 Hits -
Schnellreferenz Excel VBA
Joshuan 23.05.2008 - 219 Hits - 3 Antworten
VBA-Excel
mentosbasi 28.05.2008 - 349 Hits - 3 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
