Combobox komplett auslesen
20.12.2005 13:20:11
Matthias
bitte helft mir, damit ich endlich fertig werde!
Ich sollte alle Werte einer Combobox in eine eine Tabelle ab Zelle A2 einfügen.
Hab's wie folgt versucht:
Sub Auslesen()
For n = 1 To ComboBox1.ListCount - 1
Sheets("Übersicht aller Werte").Range("A2").End(xlUp).Offset(1, 0) = ComboBox1.List(n)
Next n
End Sub
Das Problem:
Es werden der Reihe nach alle Werte in die Zelle A2 geschrieben und nicht untereinander.
Danke für eure Hilfe!
Matthias