online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon korfuweb vom 15.10.2021, 17:02 Options

Lösung

Excel - ActiveSheet.ShowAllData

Hallo - hab mal wieder ne Frage bzgl. Fehlermeldung umgehen?

Habe in diversen Makros folgende Anweisung um alle Filter rückzusetzen:
ActiveSheet.ShowAllData

wenn allerdings keine Filter im Arbeitsblatt gesetzt sind bekomme ich verständlicherweise dann eine Fehlermeldung.

Nun meine Frage:
Wie muss der Syntax lauten, damit bei nicht gesetzten Filtern auch nicht die Anweisung "ActiveSheet.ShowAllData" ausgeführt wird, bzw. das eben keine Fehlermeldung erscheint.!


Antwort schreiben

Antwort 1 von malSchauen vom 15.10.2021, 17:15 Options

Hi,

Erster Ansatz aus dem Bauch heraus:
  On Error Resume Next
  ActiveSheet.ShowAllData
  On Error GoTo 0


bye
malSchauen

Antwort 2 von malSchauen vom 15.10.2021, 17:29 OptionsLösung

Lösung
Hi,

Zweiter Ansatz um Deine bisherige evtl. Fehlerbehandlung nicht durcheinander zu bringen:
  If ActiveSheet.FilterMode Then
    ActiveSheet.ShowAllData
  End If


bye
malSchauen

Antwort 3 von korfuweb vom 26.10.2021, 05:33 Options

Ich bedanke mich recht herzlich.

Gruß Volker

Ähnliche Themen

problem mit ActiveSheet.Protect
DerTeufel  11.07.2008 - 42 Hits - 2 Antworten

mit Excel Liste automatisch neue Excel-Dateien erstellen
jschade  26.09.2008 - 216 Hits - 5 Antworten

Excel Daten automatisch in einer anderen Excel Datei kopieren
Dutchi1972  01.10.2009 - 1325 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

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Mon Jan 26 09:21:55 2026