Ich habe derzeit diesen Code, mit dem ich das Benutzerformular starten, ein Element in das Textfeld eingeben, das Datum automatisch ausfüllen und aus einem Dropdown-Menü auswählen dann fügen Sie diese Informationen in ein neues ein Reihe.VBA Benutzerformular Dropdown-Menü Ausführung
Das cbm (combo-box) -Element zeichnet seine Werte aus einer separaten dynamisch expandierenden Tabelle und ist ein Dropdown-Menü im Benutzerformular. Das Datum wird basierend auf dem heutigen Datum automatisch ausgefüllt und das Textfeld zeichnet seinen Wert von dem, was der Benutzer eingibt.
Private Sub btnSubmit_Click()
Dim ssheet As Worksheet
Set ssheet = ThisWorkbook.Sheets("InputSheet")
nr = ssheet.Cells(Rows.Count, 1).End(xlUp).Row + 1
ssheet.Cells(nr, 3) = CDate(Me.tbDate)
ssheet.Cells(nr, 2) = Me.cmblistitem
ssheet.Cells(nr, 1) = Me.tbTicker
Mein Ziel ist es, je nachdem, welche Listenelement ausgewählt Ich möchte den Namen des betreffenden Objekts in einer Spalte eingefügt werden, die zu diesem Punkt entspricht. wenn der Benutzer "Äpfel" auswählt und die dritte Spalte die "Apfel" -Spalte ist, möchte ich, dass er an dieser Stelle eingefügt wird.
Ich gehe davon aus, dass dies mit einer Art von "If" -Aussage unten sein muss.
Jede Hilfe wird geschätzt. Here is pic of my worksheet
Wenn Sie sagen, dass die ComboBox "ihre Werte aus einer separaten dynamisch expandierenden Tabelle bezieht", meinen Sie, dass es Daten gebunden ist, oder machst du das in Code? – Comintern
Ich benutzte den Namen Manager, um es zu markieren und schrieb dann Code: Für jede Zelle in [Name] me.mblistitem.AddItem Zelle nächste Zelle – Anthony
so haben Sie "Apfel" -Spalte mit einem Bündel von "Äpfel" in den Zellen gefüllt ? Vielleicht möchten Sie einige Beispiele für Ihre Datenstruktur sowie die gewünschte Logik hinzufügen – user3598756