Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1724to1728
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

Userform-Dropdown

Userform-Dropdown
28.11.2019 16:27:07
Klaus
Hallo geliebte Gemeinde,
ich würde gern ein Userform in meine Excel einbauen, die ein Dropdownmenü besitzt, dass alle Variablen in Spalte X !einmal! auflistet, sodass ich damit eine Datenbank bearbeiten kann.
Die Anzahl der Variablen sind ebenfalls unterschiedlich (sind Projektnummern/können sich auch doppeln).
Hab bisher nichts hilfreiches im Netz gefunden.
Vielen Dank im voraus.
Gruß
Klaus

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform-Dropdown
28.11.2019 16:57:09
Nepumuk
Hallo Klaus,
teste mal:
Private Sub UserForm_Initialize()
    Dim avntValues As Variant, vntItem As Variant
    Dim objDictionary As Object
    With Worksheets("Tabelle1")
        avntValues = .Range(.Cells(1, 24), .Cells(.Rows.Count, 24).End(xlUp)).Value2
    End With
    Set objDictionary = CreateObject(Class:="Scripting.Dictionary")
    For Each vntItem In avntValues
        objDictionary.Item(Key:=vntItem) = vbNullString
    Next
    ComboBox1.List = objDictionary.Keys
    Set objDictionary = Nothing
End Sub

Gruß
Nepumuk
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige