Hallo Gunter,
mit AddItem siehe RS, ich würde schreiben bei gebunden nicht.
AW: Comboboxen Spalten Anzahl
26.01.2009 11:30:37
gp
Hallo RS und Hajo,
vielen Dank für die wirklich super schnellen Antworten.
Vielen Dank.
Gruss
Gunter
AW: Comboboxen Spalten Anzahl
26.01.2009 15:51:36
Nepumuk
Hallo Gunter,
entgegen der Behauptung von RS:
Wenn du die Daten in ein Array schreibst und dieses Array der Combobox übergibst, ist die Anzahl der Spalten nicht begrenzt.
Ein Beispiel mit 1.000 Spalten:
PrivateSub UserForm_Activate() Dim lngRow As Long, lngColumn AsLong Dim strArray(1 To 1000, 1 To 1000) AsString For lngRow = 1 To 1000 For lngColumn = 1 To 1000 strArray(lngRow, lngColumn) = CStr(lngRow * lngColumn) Next Next With ComboBox1 .ColumnCount = 1000 .List = strArray EndWith EndSub