ComboBox



Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: ComboBox
von: Rainer
Geschrieben am: 10.07.2002 - 10:24:58

Hi,

mal wieder ne Frage. Ich möchte in einer ComboBox Werte aus eine Tabelle einlesen (A1:A20), damit ich daraus dann einen bestimmten Wert auswählen kann, der dann in Zelle B1 übergeben wird.

Vielen Dank

Rainer

nach oben   nach unten

Re: ComboBox
von: Helmuth
Geschrieben am: 10.07.2002 - 10:38:05

//hier wird zuerst überprüft bis wohin die Datensätze gehen
(d.h. er hört auf die Datensätze zu zählen, bis einen leere Zeile folgt)
zz = 1
zelle = Sheets(6).Range("b2")
While zelle <> ""
zz = zz + 1
zelle = Sheets(6).Range("b" & zz)
Wend

//und hier werden die Werte nacheinander an die ComboBox übergeben; wenn die Anzahl der Datensätze immer fest bleibt kannst du natürlich zz gleich durch dise Anzahl ersetzen

For i = 2 To zz - 1
ComboBox.AddItem Sheets(6).Range("a" & i)
Next i


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "ComboBox"