Hallo,
ich habe Werte über eine Userform in eine Tabelle übertragen. Dabei habe ich auch Listenfelder verwendet. Das funktioniert.
Möchte ich nun Daten über eine Userform ändern, muss er mir diese Werte ja wieder anzeigen, also in der Listbox müsste in der vorhandenen Liste der Wert markiert sein, der in der Tabelle steht. Das funktioniert aber irgendwie nicht.
Hier mein Code. In den ersten beiden Zeilen handelt es sich um normale Textfelder, da gibt es keine Probleme, Zeile 3 ist die Listbox, da bekomme ich eine Fehlermeldung. Was mach ich falsch? Da ich unsicher bin, habe ich mal die Endungen weggelassen, tatsächlich sind in der Listbos Buchstaben auszuwählen.
Nname.Text = Worksheets("Name des Tabellenblatts").Cells(zeile, 2).Text
Vorname.Text = Worksheets("Name des Tabellenblatts").Cells(zeile, 3).Text
FR1 = Worksheets("Name des Tabellenblatts").Cells(zeile, 4)
Ist mein erster Beitrag hier und ich hoffe, es war einigermaßen verständlich.
Danke schon einmal für die Unterstützung!