Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 18:57:33
17.04.2024 16:56:58
Anzeige
Archiv - Navigation
1576to1580
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
Inhaltsverzeichnis

ComboBox füllen

ComboBox füllen
07.09.2017 11:11:02
Sarah
Hallo Zusammen,
ich bräuchte da noch einmal ein wenig Hilfe.
Ich möchte eine ComboBox mit Werten aus einer anderen ExcelMappe füllen.
Das klappt auch soweit mit diesem Code:
Private Sub UserForm_Initialize()
With Workbooks.Open("Ordnerpfad", ReadOnly:=True)
ComboBox1.List = .Sheets("Daten").Range("A1:A5").Value
.Close
End With
End Sub

Jetzt möchte ich eine weitere ComboBox mit werten aus Spalte B füllen, bei denen der Status in Spalte "O" = 1 ist.
Kann ich dies überhaupt realisieren?

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

Betreff
Datum
Anwender
Anzeige
AW: ComboBox füllen
07.09.2017 11:18:48
Peter
Hallo,
so z.B.:
Dim i As Long
DIm lRow As Long
lRow = .Sheets("Daten").Cells(Rows.Count, 2).End(xlUp).Row
For i = 1 To lRow
if .Sheets("Daten").Cells(i, 15).Value = 1 Then
ComboBox2.AddItem .Sheets("Daten").Cells(i, 2).Value
End If
Next i 

AW: ComboBox füllen
07.09.2017 12:50:04
Sarah
Vielen Dank das klappt super.
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige