Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
812to816
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
812to816
812to816
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Kombobox füllen

Kombobox füllen
23.10.2006 17:31:48
Rainer
Hallo,
möchte eine Kombobox (aus der Steuerelement Toolbox) immer neu füllen.

Private Sub ComboBox19_DropButtonClick()
ComboBox19.Clear
Dim z As Integer
z = 6
Do While Sheets("Liste Verladung").Cells(z, 1) <> ""
ComboBox19.AddItem Sheets("Liste Verladung").Cells(z, 1)
z = z + 1
Loop
End Sub

So kann ich zwar füllen, aber keine Wert wird durch Klick übernommen. Wo liegt der Fehler?
Gruss Rainer

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

Betreff
Datum
Anwender
Anzeige
AW: Kombobox füllen
23.10.2006 17:41:12
chris
Hallo Rainer, vieleicht hilft dir das weiter ?!

Private Sub ComboBox1_Click()
Cells(1, 1) = ComboBox1.Value
End Sub


Private Sub ComboBox1_GotFocus()
ComboBox1.Clear
Dim z As Integer
z = 6
Do While Cells(z, 1) <> ""
ComboBox1.AddItem Cells(z, 1)
z = z + 1
Loop
End Sub

Perfekt! :-) Vielen Dank o. T.
23.10.2006 17:51:57
Rainer
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige