Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1220to1224
1220to1224
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Combobox filtern

Forumthread: Combobox filtern

Combobox filtern
Sven
Hi,
ich hoffe ihr könnt mir helfen...
ich habe eine Userform mit Comboboxen.
Combobox1 soll mit Daten aus der Tabelle "Zusammenfassung" aus Spalte A gefüllt werden wo das Datum (Spalte E) gleich ist mit Datum aus label1.text der Userform.
Habt ihr ne Idee?
Gruß
Sven
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Combobox filtern
15.07.2011 08:50:49
oberschlumpf
Hi Sven
Haste ne Bsp-Datei mit Bsp-Daten mit Bsp-Userform?
Ciao
Thorsten
AW: Combobox filtern
15.07.2011 09:03:35
Beverly
Hi Sven,
suche in einer Schleife in Spalte E nach dem Datum des Labels und wenn ja - füge den Werte aus Spalte A in die ComboBox: 
Private Sub CommandButton1_Click()
Dim rngZelle As Range
Dim strStart As String
Set rngZelle = Worksheets("Zusammenfassung").Columns(5).Find(CDate(Label1), lookat:=xlWhole)
If Not rngZelle Is Nothing Then
ComboBox1.AddItem rngZelle.Offset(0, -4)
strStart = rngZelle.Address
Do
Set rngZelle = Worksheets("Zusammenfassung").Columns(5).FindNext(rngZelle)
If rngZelle.Address = strStart Then Exit Do
ComboBox1.AddItem rngZelle.Offset(0, -4)
Loop While Not rngZelle Is Nothing
End If
Set rngZelle = Nothing
End Sub


Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige