Listenfeldindex
27.02.2006 18:09:54
alex
ich habe eine USerform mit einigen listboxes die ich langsam auffuelle.
Da ich keine Scrollpfeile haben will veraendere ich die Groesse der Listbox in jedem Programmdurchlauf.
Im Moment sieht es folgendermassen aus
ListBox13.Height = 5 + 14 * (index)
ListBox13.IntegralHeight = False
ListBox13.Visible = True
Dies muesste ich aber fuer jede Listbox machen (nicht sehr schoen)
Ich wuerde das ganze lieber in einer Schleife laufen lassen.
z.B. for n = 1 to 20 'ich habe 20 Listboxen die ich anpassen muss
ListBox(n).Height = 5 + 14 * (index)
ListBox(n).IntegralHeight = False
ListBox(n).Visible = True
next n
Was mache ich falsch ? Oder kann man die listboxen nicht auf diesem Wege Listbox(n)ansprechen?
Danke
Alex