Forum
Tipps
News
Menu-Icon

VBA: Laufzeitfehler 381 - Eigenschaft List konnte nicht gesetzt werden...

Hallo :)
Habe im Initialize-Ereignis bei meiner Userform folgenden Code:

Zitat
Private Sub UserForm_Initialize()
Dim Zeile As Long
Me.lstKunden.ColumnCount = 3
Zeile = 2

Do Until Worksheets("Kunden").Cells(Zeile, 2).Value = ""
Me.lstKunden.List(Me.lstKunden.ListCount - 1, 1) = Worksheets("Kunden").Cells(Zeile, 1).Value
Zeile = Zeile + 1
Loop

End Sub


Kann das Programm nicht ausführen, da immer der "Laufzeitfehler 381" erscheint! Die Beschreibung dazu lautet: "Eigenschaft List konnte nicht gesetzt werden. Index des Eigenschaftenfelds ungültig"

Der Fehler muss wohl hier
Me.lstKunden.List(Me.lstKunden.ListCount - 1, 1) = Worksheets("Kunden").Cells(Zeile, 1).Value
liegen, erkenne da aber keinen Fehler. Wer kann mir helfen ?
« Installer bzw Skript erstellen.Projekt : 2013 für die Schule »
 

Schnelle Hilfe: Hier nach ähnlichen Fragen und passenden Tipps suchen!

Fremdwörter? Erklärungen im Lexikon!
Quellcode
Ein Quellcode, auch als Quelltext bekannt, bezeichnet den unkompilierten Programm-Code einer Software. Quell- oder Programm-Code ist der auch für Menschen lesbare Co...

Unicode
Unicode ist ein international anerkannter Standard, der als universeller Zeichencode ("Universal Code") dient und durch das Unicode-Konsortium entwickelt und verwaltet wi...

QR-Code
QR-Codes, die Abkürzung für "Quick Response Codes", sind eine Form von zweidimensionalen Barcodes. Damit lassen sich Informationen schnell und effizient speiche...