Beim Öffnen von Multi-Select Listbox alles auswähl

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

Betrifft: Beim Öffnen von Multi-Select Listbox alles auswähl
von: Marie
Geschrieben am: 27.10.2015 11:38:59

Hallo,
ich habe eine Userform (frmOptions), die eine Multi-Select Listbox (lstOptions) enthält.
Gibt es eine Möglichkeit, dass beim Öffnen der Userform alle Optionen dieser Listbox automatisch ausgewählt, also mit dem Häkchen davor erscheinen, statt ohne ?
Ich dachte, ich kann dafür UserForm_Initialize() verwenden, finde aber keinen Weg, die einzelnen Optionen auszuwählen, d.h. anzuklicken.
Kann mir jemand damit weiterhelfen ?
Vielen Dank im Voraus,
Mike

Bild

Betrifft: AW: Beim Öffnen von Multi-Select Listbox alles
von: Daniel
Geschrieben am: 27.10.2015 11:54:15
Hi
mit folgender Schleife im Initialize-Event der Userform.
die Listbox muss zu diesem Zeitpunkt natürlich schon mit Inhalt gefüllt sein.


dim i as Long
with Listbox1
    for i = .ListCount - 1
        .selected(i) = True
    Next
End With

Gruß Daniel

Bild

Betrifft: AW: Beim Öffnen von Multi-Select Listbox alles
von: Mike
Geschrieben am: 27.10.2015 12:05:10
Hallo Daniel,
vielen Dank !
Hier wird mir die for-Zeile rot angezeigt - fehlt da vielleicht ein "to" ?
VG,
Mike

Bild

Betrifft: AW: Beim Öffnen von Multi-Select Listbox alles
von: Daniel
Geschrieben am: 27.10.2015 12:15:54
Hi
ja, muss heissen for i = 0 to
Gruß Daniel

Bild

Betrifft: AW: Beim Öffnen von Multi-Select Listbox alles
von: Mike
Geschrieben am: 27.10.2015 12:21:44
Super, das klappt - vielen Dank für die schnelle Hilfe !
VG,
Mike

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Beim Öffnen von Multi-Select Listbox alles auswähl"