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

Forumthread: Combobox mit Werten erst ab "A6" füllen

Combobox mit Werten erst ab "A6" füllen
01.02.2005 23:23:13
Edwin
Hallo,
ich will eine Combo mit Werten füllen. Das klappt soweit, nur kommen immer die Werte schon ab "A1" und ich will erst die Werte ab "A6".
Wie muss ich meinen Code ändern, dass das klappt?
cboSparte.List = Worksheets("Tabelle1").Range("A6").CurrentRegion.Value
cboSparte.Value = cboSparte.List(5, 0)
Gruß
Edwin
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Combobox mit Werten erst ab "A6" füllen
PeterW
Hallo Edwin,
um die letzte gefüllte Zelle in Spalte A zu ermitteln hilft CurrentRegion nicht weiter. Versuch es mal so (beispielhaft in das Initialize-Ereignis gelegt):

Private Sub UserForm_Initialize()
Dim lgLetzte As Long
With Sheets("Tabelle1")
lgLetzte = .Cells(Rows.Count, 1).End(xlUp).Row
cboSparte.List = .Range("A6:A" & lgLetzte).Value
End With
End Sub

Gruß
Peter
Anzeige
Danke
Edwin
Hallo Peter,
prima, Du hast mir sehr geholfen.
Vielen Dank!
Gruß
Edwin
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige