ListBox mit Einträge aus Worksheet füllen
30.07.2002 15:10:00
Michael
Ich möchte in einer ListBox der Userform eine Liste darstellen.
Die Liste startet in der Zelle BK2. das Ende wird automatisch gesucht.
Leider bekomme ich folgende Fehlermeldung:"Eigenschaft List konnte nicht gesetzt werden. Index des Eigenschaftenfelds ungültig."
Wer kann mir weiterhelfen ?
Vorab vielen Dank !
Michael
'sucht den letzten Eintrag
LetztCChilfs = Worksheets("Data").Cells(Cells.Rows.Count, 63).End(xlUp).Row
'schreibt in das Listenfeld
'Me.ListBoxLieferanten.List = Worksheets("Data").Range("BK2:BK" & LetztCChilfs)
CC_Anzeige2.ListBoxLieferanten.List = Worksheets("Data").Range("BK2:BK" & LetztCChilfs)