Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Autofilter ungleich Benannten Bereich

Forumthread: Autofilter ungleich Benannten Bereich

Autofilter ungleich Benannten Bereich
17.01.2018 09:13:46
Jörg
Hallo Forum,
ich habe einen Benannten Bereich "KST_Filter",mit dem Code
ActiveSheet.Range("$A$1:$B$79").AutoFilter Field:=1, Criteria1:=Application.Transpose(Range("KST_Filter"))
erreiche ich, daß alle Kostenstellen, die in diesem Bereich stehen bei der Filterung angezeigt werden.
Wie lautet der richtige Code, wenn ich genau diese Kostenstellen nicht im gefilterten Ergebnis sehen möchte?
Ich habe verschiedene Varianten mit incl. "" ausprobiert aber bislang hat es nicht geklappt.
Besten Dank im Voraus,
ciao Jörg
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Musterdatei?
17.01.2018 10:06:31
UweD
Hallo
Hast du mal eine Musterdatei?
AW: Musterdatei?
17.01.2018 10:18:41
Jörg
Hallo Uwe,
anbei die Musterdatei.

Die Datei https://www.herber.de/bbs/user/119032.xlsm wurde aus Datenschutzgründen gelöscht


Ciao Jörg
AW: Musterdatei?
17.01.2018 10:19:09
Jörg
noch offen
Anzeige
ich hab keine Idee
18.01.2018 08:10:12
UweD
sorry
AW: Musterdatei?
18.01.2018 11:36:52
Jörg
Hallo Luschi,
vielen Dank Für die Datei, funktioniert einwandfrei.
Ciao Jörg
Anzeige
Anzeige

Infobox / Tutorial

Autofilter für Kostenstellen in Excel


Schritt-für-Schritt-Anleitung

Um mit dem Autofilter in Excel Kostenstellen auszublenden, die in einem benannten Bereich wie "KST_Filter" stehen, kannst du folgenden VBA-Code verwenden:

ActiveSheet.Range("$A$1:$B$79").AutoFilter Field:=1, Criteria1:="<>" & Application.Transpose(Range("KST_Filter"))

Dieser Code filtert alle Kostenstellen aus, die im Bereich "KST_Filter" definiert sind. Achte darauf, dass du die korrekten Zellbereiche und den Namen deines benannten Bereichs anpasst.

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Wähle Einfügen > Modul, um ein neues Modul zu erstellen.
  3. Füge den obigen Code in das Modul ein.
  4. Schließe den VBA-Editor und gehe zurück zu Excel.
  5. Führe das Makro aus, um die Filter anzuwenden.

Häufige Fehler und Lösungen

  • Fehler: "Kein gültiger Bereich"

    • Stelle sicher, dass der benannte Bereich "KST_Filter" korrekt definiert ist und tatsächlich Werte enthält.
  • Fehler: Filter zeigt immer noch die Kostenstellen an

    • Überprüfe, ob du das Kriterium richtig gesetzt hast. Das "<>" Zeichen bedeutet "ungleich".

Alternative Methoden

Wenn du keine VBA-Lösungen verwenden möchtest, kannst du auch die Autofilter-Option in Excel manuell nutzen:

  1. Wähle den Datenbereich aus, den du filtern möchtest.
  2. Klicke auf Daten > Filter > AutoFilter.
  3. Klicke auf den Dropdown-Pfeil in der Spalte, die du filtern möchtest.
  4. Wähle Benutzerdefiniertes Filter und setze die Bedingung auf "Ist ungleich" und wähle die entsprechenden Kostenstellen aus.

Praktische Beispiele

Angenommen, du hast folgende Kostenstellen in deinem Datenbereich:

Kostenstelle Betrag
100 200
200 300
300 400

Wenn du die Kostenstellen 100 und 200 im benannten Bereich "KST_Filter" hast, wird der Code:

ActiveSheet.Range("$A$1:$B$79").AutoFilter Field:=1, Criteria1:="<>" & Application.Transpose(Range("KST_Filter"))

alle Zeilen außer der Kostenstelle 300 anzeigen.


Tipps für Profis

  • Nutze die Advanced Filter-Funktion von Excel, um komplexere Filterkriterien zu erstellen.
  • Teste dein Makro mit einer Kopie deiner Datei, um unerwünschte Änderungen zu vermeiden.
  • Halte deinen benannten Bereich aktuell, um sicherzustellen, dass die Filterung immer korrekt funktioniert.

FAQ: Häufige Fragen

1. Wie kann ich den benannten Bereich "KST_Filter" anpassen?
Du kannst den benannten Bereich über Formeln > Namensmanager verwalten. Dort kannst du den Bereich ändern oder neue Bereiche hinzufügen.

2. Funktioniert dieser Code in allen Excel-Versionen?
Ja, der angegebene VBA-Code sollte in den meisten modernen Excel-Versionen (2010 und später) ohne Probleme funktionieren, solange die Makros aktiviert sind.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige