AddItem
16.02.2005 10:16:46
Morthen
Hallo Leute, ich habe folgendes Problem:
Ich habe im ersten Tabellenblatt("Übersicht") in der Zelle A5:A10 verschiedene Namen drin("Muster","Hans",...)
Im zweiten Tabellenblatt habe ich ein Kombinationsfeld erstellt, wo ich die Namen vom ersten Tabellenblatt aufgelistet will.
Private Sub ComboBox1_Change()
Dim i As Integer
Sheets("Kandidat").ComboBox1.Clear
i = 5
Do While Sheets("Übersicht").Cells(i, 1).Value <> ""
Sheets("Kandidat").ComboBox1.AddItem i
i = i + 1
Loop
End Sub
So sieht mein Code aus, aber im kombinationfeld sehe ich die Werte 5 und 6 (die Zellen, die mit einem Wert gefüllt sind logischer Weise)
Aber wie mache ich anstatt die Zellnummer, den Inhalt (Wert) der Zelle sichtbar?
Danke vielmal für die Hilfe...
Es sollte also nicht, ( 5 , 6 )
sondern.. ( Muster , Hans) in der Liste heissen!
Anzeige