VBA um Werte aus einer listbox auf einem Tabellenblatt in Excel

Ich habe eine listbox namens ListBox1 in Tabelle1 der excel-Arbeitsmappe.

Jedesmal, wenn der Benutzer eines der Elemente in der Liste, die ich kopieren muss seinen Namen in eine variable namens strLB.

So, wenn ich Value1, Value2, Value3, Value4, und der Benutzer wählt Wert1 und Wert3, ich brauche meine strLB zu kommen als Wert1,Wert3. Ziemlich einfach.

Ich habe versucht zu tun, dass post-hoc - mit:

For i = 1 To ActiveSheet.ListBoxes("ListBox1").ListCount
    If ActiveSheet.ListBoxes("ListBox1").Selected(i) Then strLB = strLB & etc.etc.
Next i

Aber diese ist sehr langsam (ich habe eigentlich 15k Werte in meine listbox). Das ist, warum ich brauchen, um Datensatz-Auswahl in Echtzeit und nicht in einem Zyklus, nachdem der Benutzer fertig ist die Eingabe.

Natürlich werde ich auch brauchen einen Weg, um zu überprüfen, ob der Benutzer entfernt von der vorherigen Auswahl ab.

Hoffe Euch helfen können!!

InformationsquelleAutor Bruder | 2012-03-22

Schreibe einen Kommentar