Herbers Excel-Forum - das Archiv

Tabelle Filtern und in ListBox nur gefilterte zeig

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Tabelle Filtern und in ListBox nur gefilterte zeig
von: achim h.

Geschrieben am: 05.01.2007 14:46:59
Hallo Excel Freunde
Wer kann helfen?
Tabellenblatt = Name:Unfälle (Mit Daten von A1:BJ5000)
UserForm = Name:Grunddaten darin Textbox1,CommandButton1 u. ListBox2
vorgehensweise:
in der textbox1 gebe ich einen wert ein z.b. 1212
nun klicke ich den CommandButton1 und dieser soll so funzen:
Private Sub CommandButton1_Click()
Sheets("Unfälle").Activate
suche den eingegebenen wert in Unfälle Range("B2 bis Ende) dann blende alle
zeilen die den wert nicht haben aus.
das ergebnis soll dann in der listbox2 gezeigt werden
End Sub

danke achim h.
Bild

Betrifft: AW: Daten/Filtern/Autofilter ohne VBA
von: Franz D.

Geschrieben am: 05.01.2007 15:07:09
Hallo Achim,
falls deine Kriterium auch (beispielsweise) so zu erfassen wären:
Blechschaden,Körperverletzungen,Totalschaden,Supergau,Bagatelle, usw..., eine neue Spalte gründen und unter "Daten/Gültigkeit" eine Liste-Option bereit stellen die jederzeit auch leicht aktualisierbar wäre. Die Filter-Funktion könnte auch jeder (ohne Vba-Kenntnisse) schnell einsetzen.
So long.
Franz D.
Bild

Betrifft: AW: Daten/Filtern/Autofilter ohne VBA
von: achim h.
Geschrieben am: 05.01.2007 15:18:37
an eine vba lösung habe ich reges interesse da ich eine userform verwende und die ergebnisse in meiner listbox2 gezeigt werden sollen
gruss
achim h.
Bild

Betrifft: AW: Eigenschaft ListFillRange bestücken...
von: Franz D.

Geschrieben am: 05.01.2007 15:45:52
...mit dem Datenbereich wo deine Treffer gesammelt stehen. Genauer: Deine Auflistung steht im Bereich "A2:A40". Dieser Bereich mit Namen/Einfügen bennenen,z.B. "Treffer_Listbox2", diesen Eintrag ohne Sonderzeichen nach dem Feld "ListFillRange" ergänzen. Vorher hast du aber noch die Arbeit deine Trefferliste zusammen zu basteln.
Tschüss!
Franz D.
Bild

Betrifft: AW: ListBox2.RowSource = "A2:A16"
von: Franz D.
Geschrieben am: 05.01.2007 16:10:44
Hallo Achim,
Nachtrag korrektiv:
Private Sub UserForm_Initialize()
ListBox2.RowSource = "A2:A16"
End Sub

Das vorherige Beispiel war für eine Listbox direkt in Excel gedacht unter Einsatz der Werkzeugleiste.
Tschüss!
Franz D.
Bild

Betrifft: AW: ListBox2.RowSource = "A2:A16"
von: achim h.

Geschrieben am: 05.01.2007 20:33:54
hallo franz
danke für deine rückmeldungen
ich versuche das ganze etwas vesrtändlicher zu beschreiben in dem ich ein beispiel
erarbeitet habe. schau mal...
https://www.herber.de/bbs/user/39420.xls
gruss
achim h.
Bild

Betrifft: da keine rückmeldung mehr frage nochmal einstellen
von: achim h.
Geschrieben am: 06.01.2007 10:44:53
:-)
Bild

Betrifft: AW: Suchen, Sammeln, Listbox füllen
von: Franz D.
Geschrieben am: 07.01.2007 22:29:51
Hallo,
Sorry! Hätte eine Teillösung. Bringe es nicht fertig dir eine Datei namens "Listbox.xls" up zu loaden. Es kommt immer wieder die Warnung über eine Auflistung von Dateinamen. Was mache ich falsch? Vorschlag?
Tschüss!
Franz D.
Bild

Betrifft: AW: Suchen, Sammeln, Listbox füllen
von: Rat
Geschrieben am: 07.01.2007 22:31:24
Speicher die Datei direkt auf C:\
Bild

Betrifft: AW: Suchen, Sammeln, Listbox füllen
von: Franz D.
Geschrieben am: 07.01.2007 22:38:38
Hallo nochmals,
Danke Rat, dein Rat war hilfsreich. Mein Nachtrag für Achim:
https://www.herber.de/bbs/user/39457.xls
Tschüss.
Franz D.
Bild

Betrifft: Danke für deine Mühe
von: achim h.

Geschrieben am: 08.01.2007 14:58:23
hallo Franz
das ist ja ein ganz anderer ansatz.
ich schau mal in wie weit ich das weiter für mich ebtwickeln kann.
nochmals danke
gruss
achim h.
 Bild
Excel-Beispiele zum Thema "Tabelle Filtern und in ListBox nur gefilterte zeig"
Suche über mehrere Tabellen Benennen von Tabellenblättern mit Monatsnamen
Druckseitenlinien im Tabellenblatt Tabellenblattnamen in ein Listenfeld einlesen
Suchbegriff über mehrere Tabellenblätter suchen. Tabellenblätter benennen
Tabellenblatt auswählen Zustand von Tabellenblatt-Checkboxes ermitteln
Tabellenblattnamen der VBE-Projekte ändern Tabellenblattnamen nach Datum