Abfüllen Combobox
07.04.2004 23:44:03
Martina
Der bisherige Code sieht folgendermassen aus:
Dim intZaehler As Integer
intZaehler = 1
Do While Cells(intZaehler, 1) <> Empty
cboTest1.AddItem (Cells(intZaehler, 1))
intZaehler = intZaehler + 1
Loop
cboTest1.ListIndex = 0
Jetzt möchte ich aber auf eine bestimmte Tabelle - habe ca. 5 verschiede Tabellen in einer Datei - zugreiffen können.
Wie muss ich den Code hier abändern?
Vielen Dank bereits für Eure hilfe!