ComboBox_initialize...???!!!
20.11.2003 11:21:07
Mario B.
Habe eine ComboBox1 in einer Userform plaziert. Die ComboBox1 wird mit folgender Anweisung mit Kundennamen "gefüllt":
Code der UserForm
Private Sub UserForm_Initialize()
Dim C As Range
For Each C In Range("Berichte!D2:D900")
If Not IsEmpty(C) Then ComboBox1.AddItem C
Next C
ComboBox1.ListIndex = -1
End Sub
Soweit so gut! Funktioniert auch so wie es soll. Jetzt kommt es vor, das diese Kundennamen mehrmals auftauchen. Jedoch sollen sie in der Auswahlliste jeweils nur einmal erscheinen. Wie muss der Zusatz dazu lauten...???
Mfg Mario
Anzeige