Duplikate weglassen
26.02.2008 17:03:45
Alexander
mit dem folgenden Code, fülle ich eine ComboBox mit Daten aus einer Spalte.
Wie kann ich es realisieren, das er nur Unikate nimmt, und die Duplikate rauslässt?
Alex
Private Sub CommandButton2_Click()
If Filter1.Value = "Größe" Then
Filter.ComboBox1.RowSource = _
Sheets("Tabelle1").Range("E2:E" & _
ActiveSheet.UsedRange.Rows.Count).Address
End If
End Sub