Thema Datum  Von Nutzer Rating
Antwort
Rot AutoFilter Kriterium in Array Speichern
28.06.2021 16:23:44 Joachim
Solved
28.06.2021 17:08:31 Mase
*****
Solved
29.06.2021 09:16:46 Joachim
NotSolved
29.06.2021 09:32:09 Mase
NotSolved
29.06.2021 11:05:37 Joachim
NotSolved
29.06.2021 11:24:15 Mase
NotSolved
29.06.2021 11:28:15 Joachim
NotSolved
29.06.2021 14:17:16 Mase
NotSolved

Ansicht des Beitrags:
Von:
Joachim
Datum:
28.06.2021 16:23:44
Views:
84
Rating: Antwort:
 Nein
Thema:
AutoFilter Kriterium in Array Speichern

Hallo,

ich habe eine Frage zum Thema AutoFilter.

Um die Filtereinstellungen des Autofilters in ein Array zu speichern, möchte ich folgenden Code nutzen. Wichtig hier ist, dass mehrere Kriterien ausgewählt werden können und die gespeichert werden.

Public Sub Testo()

    Dim vntCriteria As Variant

    vntCriteria = Worksheets("Test").AutoFilter.Filters(1).Criteria1

    If IsArray(vntCriteria) Then
        MsgBox "Mehrere Werte"
    Else
        MsgBox vntCriteria
    End If

End Sub

Leider speichert immer nur das erste Kriterium, es wird also kein Array angelegt.

Beispielsweise habe ich eine Spalte mit A, B, C und D und filtere A und B. Lass ich das Makro durchlaufen, gibt er mir aber immer nur A als Kriterium heraus.

Hintergrund ist, dass ich zur Bearbeitung eienr großen Tabelle die Filter entfernen und nachher wieder setzen möchte.

Wenn nötig gebe ich auch gerne noch mehr Info´s.

 

Danke schon mal im Voraus.

 

Joachim


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot AutoFilter Kriterium in Array Speichern
28.06.2021 16:23:44 Joachim
Solved
28.06.2021 17:08:31 Mase
*****
Solved
29.06.2021 09:16:46 Joachim
NotSolved
29.06.2021 09:32:09 Mase
NotSolved
29.06.2021 11:05:37 Joachim
NotSolved
29.06.2021 11:24:15 Mase
NotSolved
29.06.2021 11:28:15 Joachim
NotSolved
29.06.2021 14:17:16 Mase
NotSolved