Hi zusammen,
habe ein Problem bei dem mir selbst google nicht helfen kann.
Ich habe eine UserForm gebastelt in der u.a. eine Listbox enthalten ist. Die Listbox wird über .RowSource aus der Tabelle "TBL_Temp" befüllt:
With UserForm_Explorer.ListBox_Explorer
.ColumnCount = 9
.ColumnHeads = True
.ColumnWidths = "0;200;50;70;70;35;70;70;70"
.RowSource = TBL_Temp.Range(TBL_Temp.Cells(lngRow + 1, lngCol), TBL_Temp.Cells(lngRowMax, lngColMax)).Address
End with
Nun habe ich in der Userform zusätzlich Filtermethoden durch Steuerelemente (Checkboxen, Optionbuttons) eingebaut. Der Anwender kann diese Filtermöglichkeiten setzen wie er will. Die Daten in dem Worksheet TBL_Temp werden entsprechend den gewählten Filtern automatisch angepasst.
Nun das Problem: Wenn ich die gefilterten Daten aus TBL_Temp erneut in die ListBox schreiben will (damit nur die gefilterten Daten dem Anwender angezeigt werden), tut sich genau garnichts. Die Listbox "zuckt" zwar kurz aber die Inhalte der ListBox stimmen absolut nicht mit den Inhalten von TBL_Temp überein.
Die gefilterten Daten werden exakt mit dem obigen Code erneut an die Listbox gesendet.
Es sieht so aus, als ob die Listbox einfach nicht aktualisiert wird.
Was ich bereits erfolglos probiert habe:
- .rowsource = "" und danach die Listbox neu befüllen
Interessant ist auch:
Wenn ich den Code schrittweise (mit F8) durchlaufen lasse, dann wird die Listbox korrekt aktualisiert.
Leider kann ich die Datei nicht zur Verfügung stellen, da sehr viele sensible Daten enthalten sind, die ich nicht entfernen kann ohne dass die Funktionalität verloren geht.
Ich bin für jegliche Hilfe sehr dankbar.
LG und einen schönen Sonntag,
Patrick