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

Autofilter-gefilterte Kriterium sichbar machen

Forumthread: Autofilter-gefilterte Kriterium sichbar machen

Autofilter-gefilterte Kriterium sichbar machen
17.07.2007 12:49:00
Dinci
Hallo,
ich eine schlichte Tabelle, die ich mit einem Autofilter bestückt habe. Wenn ich nach einem bestimmten Kriterium suchen will, dann klappt dieses wunderbar mit dieser Funktion.
Verwende ich einen Filter, so kann ich an dem blauen Dreieck im Drop-Down-Menü erkennen, dass der Filter aktiv ist.
Dieses blaue Dreieck ist jedoch nicht immer leicht zu erkennen, erst recht nicht, wenn man viele Spalten verwendet. Dann wird die Aufhebung des Filter in manchen Fällen eine Suchpartie.
Wie kann man eine Aktivierung deutlicher erkannbar machen (bspw. die ausgewählte Spalte wird dann farblich unterlegt)?
Danke
Dinci

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Autofilter-gefilterte Kriterium sichbar machen
17.07.2007 13:15:18
Jürgen
Hallo Dinci,
ich arbeite auch schon seit Jahren mit Autofilter. Meines Wissens gibt es dahingehend keine weitere Unterscheidungsmöglichkeit. Der Pfeil des Filters wird blau und die Zeilennummern bleiben solange blau bis alle Filter deaktiviert sind.
Du kannst höchsten was mit Deiner Darstellung des Bildschirms machen, in dem Du unter der Systemsteuerung, Anzeige, eine größere Schriftart wählst. Dadurch werden die Pfeile etwas größer.
Eine andere Möglichkeit ist ein Makro. Dies muss aber dann immer manuell gestartet werden. Und Du brauchst wiederum eins um alles wieder rückgängig zu machen. ob sich das rentiert?
Gruß
Jürgen

Anzeige
AW: Autofilter-gefilterte Kriterium sichbar machen
17.07.2007 13:24:00
MrJola
Hallo Dinci,
ich habe mir das Symbol "Daten/Alle anzeigen" in die Menüleiste gezogen. Ein benutzerdefiniertes Sybol ausgewählt - fertig.
Jedesmal, wenn ich mich über zu viele Autofilter "verlaufen" habe, genügt jetzt ein Knopfdruck.
Gruß Jörg

Das geht alles auch automatisch...
17.07.2007 13:39:00
{Boris}
Hallo Jürgen,
Eine andere Möglichkeit ist ein Makro.
Korrekt.
Dies muss aber dann immer manuell gestartet werden
Mitnichten, denn dafür gibt es die Ereignisse, in diesem Fall das Calculate-Ereignis.
Ergo: In irgendeiner Zelle eine flüchtige Funktion hinterlegen (z.B. =ZUFALLSZAHL() ). Dann mit Alt+F11 den VBA-Editor öffnen, links Doppelklick auf DIE Tabelle, in der der Autofilter angewandt werden soll, und rechts diesen Code reinkopieren:

Option Explicit
Private Sub Worksheet_Calculate()
Dim Af As AutoFilter
Dim lngAfRow As Long
Dim lngAfCol As Long
Dim x As Long
With ActiveSheet
If .FilterMode Then
Set Af = .AutoFilter
lngAfRow = Af.Range.Row
lngAfCol = Af.Range.Column
For x = 1 To Af.Filters.Count
If Af.Filters(x).On Then
.Cells(lngAfRow, lngAfCol + x - 1).Interior.ColorIndex = 3 '3 ist rot
Else
.Cells(lngAfRow, lngAfCol + x - 1).Interior.ColorIndex = xlNone
End If
Next x
End If
End With
End Sub


Damit arbeite ich ständig.
Grüße Boris

Anzeige
AW: Das geht alles auch automatisch...
18.07.2007 00:42:43
Jürgen
Hallo Boris,
wieder was gelernt.
Gruß jürgen
;
Anzeige
Anzeige

Infobox / Tutorial

Autofilter: Kriterium sichtbar machen und zeilen blau markiert

Schritt-für-Schritt-Anleitung

  1. Autofilter aktivieren: Wähle die Tabelle aus und gehe zu Daten > Filter > Autofilter. Du solltest nun das blaue Dreieck in der Kopfzeile der Spalten sehen.

  2. Filter anwenden: Klicke auf das Dropdown-Menü in der gewünschten Spalte und wähle das Kriterium aus, nach dem du filtern möchtest.

  3. Farbige Markierung hinzufügen: Um die aktivierten Filter deutlicher zu machen, kannst du VBA verwenden. Öffne den VBA-Editor mit Alt + F11 und füge den folgenden Code in das entsprechende Arbeitsblatt ein:

    Option Explicit
Private Sub Worksheet_Calculate()
    Dim Af As AutoFilter
    Dim lngAfRow As Long
    Dim lngAfCol As Long
    Dim x As Long
    With ActiveSheet
        If .FilterMode Then
            Set Af = .AutoFilter
            lngAfRow = Af.Range.Row
            lngAfCol = Af.Range.Column
            For x = 1 To Af.Filters.Count
                If Af.Filters(x).On Then
                    .Cells(lngAfRow, lngAfCol + x - 1).Interior.ColorIndex = 3 '3 ist rot
                Else
                    .Cells(lngAfRow, lngAfCol + x - 1).Interior.ColorIndex = xlNone
                End If
            Next x
        End If
    End With
End Sub

  4. Zellen blau hinterlegen: Du kannst auch Zellen, die durch den Filter betroffen sind, blau hinterlegen, um sie hervorzuheben. Dies kann in der Formatierung der Zellen eingestellt werden.

Häufige Fehler und Lösungen

  • Problem: Das blaue Dreieck in der Zelle ist nicht sichtbar.

    • Lösung: Überprüfe die Schriftgröße in den Anzeigeeinstellungen deines Systems. Eine größere Schriftart könnte helfen, die Anzeige zu verbessern.

  • Problem: Die Zeilennummern bleiben nicht blau, wenn der Filter aktiv ist.

    • Lösung: Stelle sicher, dass der Autofilter ordnungsgemäß aktiviert ist. Manchmal kann es helfen, Excel neu zu starten.

Alternative Methoden

  • Benutzerdefinierte Schaltfläche: Du kannst das Symbol „Daten/Alle anzeigen“ in die Menüleiste ziehen. Damit kannst du schnell alle Filter entfernen, wenn du dich „verlaufen“ hast.
  • VBA-Makro: Wie bereits erwähnt, kannst du ein Makro erstellen, das automatisch die Zeilen blau markiert, wenn der Filter aktiv ist.

Praktische Beispiele

  1. Beispiel für die Nutzung von Autofilter:

    • Du hast eine Tabelle mit Verkaufszahlen. Wenn du nur die Verkäufe für ein bestimmtes Produkt sehen möchtest, aktiviere den Autofilter und wähle das Produkt aus. Die entsprechenden Zeilen werden dann blau markiert.

  2. Farbige Markierung:

    • Nutze den oben genannten VBA-Code, um die Zeilen, die gefiltert wurden, rot oder blau zu hinterlegen. So erkennst du sofort, welche Filter aktiv sind.

Tipps für Profis

  • Excel Zeilennummern blau: Achte darauf, dass die Zeilennummern in deiner Tabelle blau bleiben, solange der Autofilter aktiv ist. Dies hilft dir, den Überblick zu behalten.
  • Makros automatisieren: Du kannst deine Makros so einstellen, dass sie bei bestimmten Ereignissen automatisch ausgeführt werden, z.B. beim Berechnen der Tabelle.

FAQ: Häufige Fragen

1. Warum sind meine Zeilennummern nicht blau, nachdem ich einen Filter angewendet habe? Das kann vorkommen, wenn die Filtereinstellungen nicht korrekt sind. Stelle sicher, dass der Autofilter aktiv ist.

2. Wie kann ich die Sichtbarkeit des blauen Dreiecks verbessern? Du kannst die Schriftgröße in den Anzeigeeinstellungen erhöhen, um das blaue Dreieck besser sichtbar zu machen.

Beliebteste Forumthreads (12 Monate)

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