Markierung bei mehrfacheinträgen
21.01.2003 12:05:49
Felix
In meiner Listbox (userform) sollen die Einträge, die bereits gemacht wurden, markiert werden. Wie geht das?
(Zeilenindex in Tabelle = Listenindex in Liste + 1)
Dim iRow As Long
For iRow = 0 To ListBox1.ListCount - 1
If Sheets(ComboBox1.Value).Cells(iRow + 1, 1) <> "" Then _
ListBox1.List(iRow) = '"MARKIEREN"
Next iRow
Vielen Dank im Voraus
Gruß
Felix
Anzeige