mal eine kurze Frage, wie kann ich per VBA in allen 15 Blättern meiner Mappe sämtliche Filter entfernen? (Wobei nicht gesagt ist dass es beim Starten des Makros in jedem der 15 Blätter auch ein Filter da ist, kann sein, kann aber auch nicht sein).
Mit entfernen meine ich so, dass nicht nur die Filter aufgehoben werden sondern auch dass sämtliche kleine Pfeile neben den Spaltenüberschriften verschwinden, insbesondere auch in den PQ Abfragen und den intelligenten Tabellen.
Hab zwar mir einen Filter in einer der intelligenten Tabellen gesetzt und dann aufgezeichnet, wie ich den wieder lösche und die Pfeile wegmache, aber der Code der dabei rausgesprungen ist, hat mir auch nicht weitergeholfen, wie ich das jetzt auf die ganze Mappe anwende...
Kann mir da jemand helfen? Ich brauche kein komplettes Makro lediglich einen Codeschnipsel, den ich in ein anderes Makro reinpacken kann.
Vielen lieben Dank und noch ein schönes Wochende
Jenny
Sub Makro2()
' Makro2 Makro
ActiveSheet.ShowAllData
Selection.AutoFilter
End Sub