Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
556to560
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
556to560
556to560
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
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

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
Danke
Edwin
Hallo Peter,
prima, Du hast mir sehr geholfen.
Vielen Dank!
Gruß
Edwin
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige