|
Farbige Zeilen filtern und sortieren |
|
|
Benutzerdefinierte Funktion
Hier eine Möglichkeit, mit Hilfe einer benutzerdefinierten Funktion, farbig markierte Zeilen, wenn die Farbgebung nicht mittels "Bedingter Formatierung" erfolgt, zu filter und sortieren.
Vereinzelt habe ich Excelanwender gesehen, die in einer umfangreichen Liste bestimmte, für sie wichtige Datensätze, manuell farblich markierten.
|
|
Farbnummer | | A | B | C | D | 1 | Kd-Nr | Lieferant | Ort | Umsatz | 2 | 001 | Müller und Co | Hamburg | 80.000,00 € | 3 | 002 | Meier GmbH | Berlin | 100.000,00 € | 4 | 003 | Schulz und Sohn | München | 120.000,00 € | 5 | 004 | Mustermann | Leipzig | 50.000,00 € | 6 | 005 | Eisen-Heinz | Stuttgart | 35.000,00 € | 7 | 006 | Gebrüder Müller | Hamburg | 140.000,00 € | 8 | 007 | Rohrhandel GmbH | Berlin | 160.000,00 € | 9 | 008 | Stahlhandel Leo & Leo | München | 75.000,00 € | 10 | 009 | Schmitz Handel | Leipzig | 55.000,00 € | 11 | 010 | Bleche Kuntze GbR | Stuttgart | 95.000,00 € | | | Diagramm - Grafik - Excel Tabellen einfach im Web darstellen Excel Jeanie HTML 3.0 Download
Da werden mühevoll viele Datensätze in den verschiedensten Farben markiert, damit sie sich optisch hervorheben und schneller gefunden werden können.
Nachdem dann durch viele Seiten gescrollt wurde und alles schön bunt ist, stellt sich ja vielleicht doch die Frage, wie kann ich mir jetzt nur die grünen Zeilen anzeigen lassen oder wie bekomme ich jetzt z.B nur die roten Zeilen in eine separate Tabelle?
Anstatt mit Farben zu arbeiten ist es besser in eine angrenzende Spalte Buchstaben oder Zahlen zu schreiben und so die gewünschten Daten zu markieren. Nach dieser Spalte kann später sortiert oder gefiltert werden. Nur mit Farben kann Excel nichts anfangen.
Sollte nun aber so eine "bunte" Tabelle vorliegen, kann mit der benutzerdefinierten Funktion "Zellfarbe()" die Farbnummer ausgelesen werden.
|
Farbnummer | | A | B | C | D | E | 1 | Kd-Nr | Lieferant | Ort | Umsatz | Hilfe | 2 | 001 | Müller und Co | Hamburg | 80.000,00 € | 0 | 3 | 002 | Meier GmbH | Berlin | 100.000,00 € | 0 | 4 | 003 | Schulz und Sohn | München | 120.000,00 € | 0 | 5 | 004 | Mustermann | Leipzig | 50.000,00 € | 35 | 6 | 005 | Eisen-Heinz | Stuttgart | 35.000,00 € | 0 | 7 | 006 | Gebrüder Müller | Hamburg | 140.000,00 € | 0 | 8 | 007 | Rohrhandel GmbH | Berlin | 160.000,00 € | 35 | 9 | 008 | Stahlhandel Leo & Leo | München | 75.000,00 € | 0 | 10 | 009 | Schmitz Handel | Leipzig | 55.000,00 € | 3 | 11 | 010 | Bleche Kuntze GbR | Stuttgart | 95.000,00 € | 0 | Formeln der Tabelle | E2 : =farbnummer(A2) E3 : =farbnummer(A3) E4 : =farbnummer(A4) E5 : =farbnummer(A5) E6 : =farbnummer(A6) E7 : =farbnummer(A7) E8 : =farbnummer(A8) E9 : =farbnummer(A9) E10 : =farbnummer(A10) E11 : =farbnummer(A11)
|
| | Diagramm - Grafik - Excel Tabellen einfach im Web darstellen Excel Jeanie HTML 3.0 Download
In einer Hilfsspalte erscheint nun die Farbnummer, mit dessen Hilfe der Autofilter genutzt oder die Tabelle nach Farbe sortiert werden kann.
Der Code für ein allgemeines Modul
Public Function farbnummer(Zelle)
'Autor: Jürgen Hennekes
If Zelle.Interior.ColorIndex = xlNone Then
farbnummer = 0
Else
farbnummer = Zelle.Interior.ColorIndex
End If
End Function
|
|
|