gefüllte listbox filtern

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

Betrifft: gefüllte listbox filtern
von: Dirk
Geschrieben am: 13.07.2015 15:50:43

Hallo ins Forum,
wäre sehr dankbar für eine Lösung von Euch.
Hier mein Problem :
Ich lasse eine Listbox in einer UF mit Daten einer Tabelle füllen.
Nun möchte ich die Einträge filtern und zwar möchte ich über eine
Textbox zum Beispiel den Nachnamen suchen. Wenn ich als 1. Buchstaben
z.B. das M eingebe, sollen alle Einträge mit dem 1. Buchstaben M ge-
filtert werden, dann gebe ich den nächsten Buchstaben ein, z.B. a
und alle Einträge, die mit Ma beginnen sollen angezeigt werden, usw.
Vielen Dank im Voraus !
Liebe Grüße
Dirk

Bild

Betrifft: AW: gefüllte listbox filtern
von: Daniel
Geschrieben am: 13.07.2015 16:26:51
Hi
lies die Werte aus der Tabelle zunächst in ein array ein (im Code als "WerteArray" bezeichnet, dieses Array sollte für alle makros der Userform gelten (deklaration erfolgt oberhalb der Makros))
ins Change-Event der der Textbox kommt dann folgender Code

dim W
dim txt as string
for each W in WerteArray
    if W like Textbox1.Text & "*" then txt = txt & "|" & W
Next
if len(txt) = 0 then
    Listbox1.Clear
Else
   Listbox1.List = Split(Mid(txt, 2), "|")
end if
Gruß Daniel

Bild

Betrifft: AW: gefüllte listbox filtern
von: Dirk
Geschrieben am: 13.07.2015 16:29:41
Hi Daniel,
danke für die schnelle Hilfe,
ich werde es nachher gleich ausprobieren !
Gruß
Dirk

 Bild

Beiträge aus den Excel-Beispielen zum Thema "gefüllte listbox filtern"