Gewähltes Autofilter-Kriterium in bestimmter Zelle anzeigen
15.07.2024 13:32:33
Sailor4711
Ich habe eine Tabelle mit Daten von B15 bis J[open end], ergo: die Liste lebt.
In der Überschriftenzeile (B14 bis J14) ist ein Auto-Filter aktiviert.
Variante A (Prio1)
Ich möchte gern in der Zelle O6 das jeweilige Filterkriterium angezeigt bekommen, nach welchem ich die Tabelle B15 bis J[open end] zuerst gefiltert habe.
Wenn ich also jetzt in meiner Tabelle z.B. nach Firmenname [Firma ABC], in Spalte D15 bis D[open end] filtere, dann möchte ich, dass im Feld O6 "Firma ABC" auch auftaucht.
Filtere ich nach Firmennamen [Firma XYZ], dann soll in O6 auch "Firma XYZ" zu lesen sein.
Jedes weitere "händisch" gesetzte, zusätzliche Filterkriterium soll dann keine Wirkung mehr haben.
Filtere ich zuerst nach irgendeinem anderen Kriterium, dann soll in O6 eben dieses andere Filterkriterium angezeigt werden; also - je nach Gusto.
Variante B (nice to have)
Ich bastele mir ein Listenfeld aus allen in Spalte D vorkommenden Firmennamen (obwohl ich die aktuell noch gar nicht alle kenne und immer welche dazukommen) und lasse dann im Feld O6 nur die Firmennamen aus dieser Liste zu. Sobald eine Firma aus O6 über die Auswahl-Liste ausgewählt ist, dann soll der Autofilter aus der Spalte mit den Firmennamen (D15 bis D[open end]), nach der in O6 ausgewählte Firma - mit allen zugehörigen Daten rechts und links - die gesamte Tabelle filtern...(sehr anspruchsvoll und sicherlich auch verwirrend was ist, wenn ich nicht nach Firmenname, sondern nach einem andern Kriterium filtern muss??)
Es wäre ganz toll, dass über Formeln (also nicht VBA, oder Macro) zu lösen, da diese Dinge aus Sicherheitsgründen im Firmennetzwerk deaktiviert sind.
Wenn's nur mit VBA o.Ä. zu realisieren ist, dann in Gottes Namen, aber dafür müsst ihr einem "minderbemitteltem VBA-Neuling" einen "Waschzettel" mitgeben, sonst wird das nix.
Dieses Thema ist sicherlich schon das eine oder das andere Mal diskutiert worden, aber so wie ich das hier benötige, habe ichs noch nirgends gefunden
Ich danke Euch! ;-)
Beste Grüße
Anzeige