ListBox nach Focus teilweise hinter anderer Listbox
25.11.2019 11:13:27
Werner
ich bastle gerade an einer Datei, die untereinander mehrere Listboxen in einem Tabellenblatt hat.
Das Focus-Event nutze ich, um die jeweilige Listbox.Height anhand der Anzahl der Items zu erweitern. Bei Lost_Focus reduziere ich wieder auf einen Standardwert.
Relevanter Ausschnitt aus dem Code:
Private Sub ListBox1_GotFocus()
ListBox1.Height = ListBox1.ListCount * ListBox1.Font.Size * 1.25
End Sub
Und jetzt kommt das Problem:
Manchmal überlagert die Listbox1 die darunter liegende Listbox2 vollständig (ist auch gewünscht so) und teilweise "verläuft" die Listbox1 hinter der darunter liegenden ListBox2 (Items also teilweise hinter Listbox2 versteckt, was nicht gewünscht ist).
Habt Ihr vielleicht eine Idee, woran das liegen könnte bzw. wie ich die ListBox mit Focus immer im Vordergrund habe?
Vielen Dank für Eure Ideen
Gruß
Werner
Anzeige