Listbox
11.01.2004 18:53:59
felix
kann mir jemand verraten warum die Listboxen alle mit einem "markierten Text" (blauer Hintergrund mit weisser Schriftfarbe) erscheinen.
möchte diese Erscheinung nicht haben, aber dennoch die voreinstellungen übernehmen. Geht das??
Private Sub UserForm_Initialize()
Dim a, i As Integer
For i = 8 To 1 Step -1
For a = 1 To 8
Controls("ListBox" & a).AddItem i
Next a
Next i
For a = 1 To 8
Controls("ListBox" & a).Text = a
Next a
End Sub
Vielen Dank
Gruß
Felix
Anzeige