gestern hatte ich einen Beitrag gesehen, der eine Kundenabfrage mit einer UF zum Inhalt hatte. Die Fragestzellerin erwähnte, dass das Makro bei einer größeren Anzahl von Spalten nicht funktioniere. Ich wollte das ausprobieren. Und tatsächlich bei einem Wert, der größer als 9 (lastCol größer 9) ist, kam die Fehlermeldung:
Eigenschaft List konnte nicht gesetzt werden. Ungültiger Eigenschaftenwert.
(iCnt hatte beim Auftreten des Fehlers den Wert 11)
For iCnt = 2 To lastCol + 1
.List(n, iCnt - 1) = wsK.Cells(rng.Row, iCnt)
Next
Auch beim Auslesen der Listbox in die Tabelle kam derselbe Fehler.
Nun habe ich ja schon das eine und andere mit VBA gemacht, aber da habe ich keine Erklärung. Könnt Ihr mir helfen?
Danke
Heinz