Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Combobox über Schleife füllen

Combobox über Schleife füllen
20.09.2007 11:45:00
Herbert
Hallo Forum
Ich habe in einer Userform 4 Comboboxen, die mit den gleichen Werten gefüllt werden sollen. Dies möchte ich über eine Schleife machen, aber - hier ist es vorbei mit den Kenntnissen. Bestimmt kann mir jemand helfen.
set wks =ThisWorkbook.Worksheets("Tabelle2")
with wks
Me.cboWahl1.List_
.Range(.Cells(1,1), .Cells(_
.UsedRange.Rows.Count,1).Value
end With
Das funktioniert
Jetzt habe ich noch 3 Combo´s (cboWahl2, cboWahl3, cboWahl4).
Danke im Voraus
Herbert

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Combobox über Schleife füllen
20.09.2007 12:48:00
Herbert
Hallo Michael
Danke für die Antwort.
Fast so - das Füllen soll beim initialisieren erfolgen, ich möchte den Code, den ich gepostet habe, einfach nicht 4 mal untereinander schreiben. so in etwa:
dim iCounter as Integer
set wks =ThisWorkbook.Worksheets("Tabelle2")
with wks
for iCounter 1 to 4
. . . . . . .
next iCounter
End With
Aber ich weis nicht wie ich die Comboboxen ansprechen soll.
Gruß Herbert

Anzeige
AW: Combobox über Schleife füllen
20.09.2007 13:28:54
Rudi
Hallo,
for iCounter 1 to 4
me.controls("cboWahl" &i).List .....
...
...
next i
Gruß aus’m Pott
Udo

Danke, das wars ! o.T.
20.09.2007 13:57:00
Herbert
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige