Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
544to548
544to548
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mit Steuerelementen Filter setzen

Forumthread: Mit Steuerelementen Filter setzen

Mit Steuerelementen Filter setzen
09.01.2005 11:23:35
Sandra
Guten Morgen!
Ich hab probiert mit den Optionsfelder in der Formularsymbolleiste das Filter-setzen etwas zu vereinfachen und hab auf das Optionsfeld auch das Makro gesetzt...aber es funktioniert nicht :-(
Hab ich mir diese Idee vielleicht etwas zu einfach vorgestellt? Kann viellecht mal jemand mir in das Makro schauen, respektive in die Datei? Oder hat das schonmal jemand gemacht und mir eine Bsp.-Datei?
https://www.herber.de/bbs/user/15821.xls
Vielen lieben Dank!
Sandra
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mit Steuerelementen Filter setzen
09.01.2005 11:39:15
Sandra
Lieber Ulf,
hui das ging jetzt aber flott und funktioniert auch wunderbar, aber irgendwie schnalle ich es dennoch nicht so recht. Was habe ich denn nun falsch gemacht? Auf was muss ich diesbezüglich achten? Denn der Code sieht ja nicht so viel anders aus...?
Vielen lieben Dank...war eben richtig perplex wie flott das ging! :-)
Liebe Grüsse
Sandra
Anzeige
AW: Mit Steuerelementen Filter setzen
Ulf
Es war ein Syntaxfehler im Code. Außerdem muss das Makro allen drei Otionbutton zugeordnet werden.
Ulf
AW: Mit Steuerelementen Filter setzen
Sandra
Aha...hab ich nicht gewusst! Vielen lieben Dank!
Jetzt aber noch schnell ne andere Frage wenn ich schon so einen Profi hier habe. Ich hätte jetzt noch eine andere Spalte zu filtern, in der aber auch mehrere Angaben zusammen gefiltert werden sollten. Sprich zB. Kriterium1 ="A" und Kriterium2 ="B". Dieses müsste ich ja über Kontrollkästchen mit Häckchen setzen machen. Aber das bringt mir ja dann nur Wahr oder Falsch. Mit Werten wäre mir das lieber gewesen, denn dann hätte ich die einzelnen addieren können und die Summe dann im Makro abfragen und entsprechend die Filter setzen... Hast Du diesebzüglich eine Idee?
Auf jeden vielen vielen lieben Dank!!
Liebe Grüsse
Sandra
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Mit Steuerelementen in Excel Filter setzen

Schritt-für-Schritt-Anleitung

  1. Vorbereitung: Stelle sicher, dass du die Entwicklertools in Excel aktiviert hast. Gehe zu Datei > Optionen > Menüband anpassen und aktiviere das Kontrollkästchen für die Entwicklertools.

  2. Steuerelemente einfügen: Wechsle zur Registerkarte Entwicklertools und füge ein Optionsfeld oder Kontrollkästchen ein. Diese Steuerelemente helfen dir, die Filterung in Excel zu steuern.

  3. Makro erstellen: Klicke auf Visual Basic und erstelle ein neues Modul. Füge folgenden Code ein, um die Filterung zu aktivieren:

    Sub FilterSetzen()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("DeinBlattname")

    ' Beispiel für das Filtern einer Spalte
    ws.Range("A1:C100").AutoFilter Field:=1, Criteria1:="DeinKriterium"
End Sub

  4. Makro zuweisen: Weisen Sie das Makro den Steuerelementen zu. Rechtsklicke auf das Optionsfeld oder Kontrollkästchen und wähle Makro zuweisen.

  5. Testen: Klicke auf die Steuerelemente, um zu sehen, ob die Filterung korrekt angewendet wird.

Häufige Fehler und Lösungen

  • Syntaxfehler: Wenn dein Makro nicht funktioniert, überprüfe den Code auf Syntaxfehler. Achte darauf, dass alle Variablen und Objekte korrekt deklariert sind.

  • Makrozuweisung: Stelle sicher, dass das Makro allen Steuerelementen zugewiesen ist. Wenn du mehrere Optionen hast, müssen alle mit dem entsprechenden Makro verbunden werden.

  • Falsche Blattnamen: Überprüfe, ob der Blattname im Code korrekt ist. Ein falscher Blattname führt dazu, dass das Makro nicht ausgeführt werden kann.

Alternative Methoden

Neben der Verwendung von Steuerelementen kannst du auch die AutoFilter-Funktion direkt in Excel verwenden. Dazu gehst du wie folgt vor:

  1. Wähle die Daten aus, die du filtern möchtest.
  2. Gehe zu Daten > Filter > Autofilter.
  3. Verwende die Dropdown-Pfeile in den Spaltenüberschriften, um die gewünschten Filterkriterien auszuwählen.

Diese Methode ist besonders nützlich, wenn du keine Steuerelemente verwenden möchtest.

Praktische Beispiele

Ein praktisches Beispiel für die Verwendung von Steuerelementen könnte so aussehen:

  • Wenn du ein Optionsfeld für die Auswahl von "Aktiv" oder "Inaktiv" hast, kannst du den folgenden Code verwenden:

    Sub FilterAktivInaktiv()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("DeinBlattname")

    If ActiveSheet.OptionButton1.Value = True Then
        ws.Range("A1:C100").AutoFilter Field:=2, Criteria1:="Aktiv"
    Else
        ws.Range("A1:C100").AutoFilter Field:=2, Criteria1:="Inaktiv"
    End If
End Sub

Tipps für Profis

  • Verwendung von ActiveX-Steuerelementen: Wenn du mehr Flexibilität benötigst, kannst du ActiveX-Steuerelemente verwenden. Diese bieten erweiterte Optionen für die Interaktion mit deinen Daten.

  • Dynamische Filter: Du kannst die Filterkriterien dynamisch anpassen, indem du die Werte aus anderen Zellen in dein Makro einfügst. So bleibt dein Filter immer aktuell.

  • Dokumentation und Kommentare: Kommentiere deinen Code, um ihn verständlicher zu machen. Das ist besonders hilfreich, wenn du später Änderungen vornehmen musst.

FAQ: Häufige Fragen

1. Wie kann ich mehrere Kriterien gleichzeitig filtern?
Du kannst dies erreichen, indem du die Criteria1 und Criteria2-Parameter in deinem Makro verwendest. Hier ein Beispiel:

ws.Range("A1:C100").AutoFilter Field:=1, Criteria1:="Kriterium1", Operator:=xlOr, Criteria2:="Kriterium2"

2. Was mache ich, wenn mein Makro nicht ausgeführt wird?
Überprüfe die Makrosicherheitseinstellungen in Excel unter Datei > Optionen > Trust Center > Einstellungen für das Trust Center. Stelle sicher, dass die Ausführung von Makros erlaubt ist.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige