Hallo zusammen,
in einem Excel-Dokument müssen mehrere Schritte mit VBA durchgeführt werden. Das klappt soweit schon gut. Der einzige Schritt der noch nicht wirklich klappt, ist das Setzen von Autofiltern durch das Abrufen der Kriterien aus einem Tabellenblatt. Zur einfacheren Schilderung meines Problems, habe ich mein Anliegen in das nachfolgende Dokument isoliert eingebaut - auch wenn das nachfolgende Dokument zur Endanwendung überhaupt keinen Sinn ergibt.
https://www.herber.de/bbs/user/140309.xlsm
In diesem Dokument sind zwei Tabellenblätter.
Auf Tabellenblatt "Übersicht" soll es dem Benutzer möglich sein mit einer Liste zu arbeiten, welche er beliebig Filtern und Sortieren kann. Nun klickt der Benutzer auf die erste Schalfläche ("1. Aktive Autofilter dokumentieren"). In Wirklichkeit geschehen jetzt verschiedene Zwischenschritte, wofür im Tabellenblatt "Übersicht" die Autofilter zurückgesetzt werden müssen. Damit der Benutzer nach diesen Zwischenschritten wieder seine ursprünglich gefilterte Liste vorfindet, dachte ich mir, seine gesetzten Autofilter in das Tabellenblatt "Autofilter" zwischen zu speichern, was eben bei diesen Klick auf die erste Schaltfläche dargestellt wird: Die in Spalte 1 und 2 gesetzten Autofilter werden in das Tabellenblatt Autofilter geschrieben.
Das Zurücksetzen aller Autofilter im Tabellenblatt "Übersicht" (für die erforderlichen Zwischenschritte im eigentlichen Dokument) erfolgt in unserem Beispiel-Dokument dann durch Klick auf die zweite Schalfläche ("2. Filter zurücksetzen").
Am Ende soll der Benutzer wieder auf den Tabellenblatt "Übersicht" sein, in dem er seine wie ursprünglich gefilterte Liste vorfindet - deswegen im dritten Schritt durch Klick auf die dritte Schalfläche ("3. Filter abrufen"): Die ursprünglich vom Benutzer gesetzten Autofilter werden wieder auf die Liste im Tabellenblatt "Übersicht" angewendet.
Nun meine Fragen...
Zur ersten Schaltfläche "1. Aktive Autofilter dokumentieren": Gibt es eine einfachere Möglichkeit wie meine wagen Versuche, die gesetzten Autofilter zu dokumentieren? In Wirklichkeit sind es nämlich nicht zur zwei Spalten, sondern zehn Spalten, bei denen die Autofilter zwischengespeichert werden sollten.
Zur dritten Schaltfläche "3. Filter abrufen": Wahrscheinlich wird hier jeder, der Ahnung von VBA hat, den Kopf schütteln. Ich gebe zu. Meine Versuche sind sehr dürftig. Insbesondere ist mein Problem, dass dieser Code (zunächst für Spalte 1 geschrieben) nur für maximal fünf Filterkriterien funktioniert. Mit welchen Ansatz könnte man die Anzahl der Filterkriterien variabel gestalten?
Ich danke Euch bereits jetzt ganz herzlich für Eure Rückmeldungen.