VBA - 2 Userforms m. Comboboxen
01.11.2023 15:15:42
Streicher
ich habe Probleme bei folgender Aufgabenstellung:
Ich möchte auf einem Arbeitsblatt zwei Buttons erstellen, die jeweils eine Userform mit Combobox starten. Diese Comboboxen sollen unterschiedlich mit jeweils einer Spalte aus 2 unterschiedlichen Tabellenblättern befüllt werden, also z.B:
Tabellenblatt1 - Button1 - Userform1 - Combobox1-befüllt mit Spalte A aus Tabellenblatt 2
Tabellenblatt1 - Button2 - Userform2 - Combobox2- befüllt mit Spalte A aus Tabellenblatt 3
Erstellen der Buttons + die 2 Userforms mit den Comboboxen aufzurufen ist nicht das Problem, ich scheitere beim befüllen der Comboboxen auf den unterschiedlichen Userforms.
Mit nur einer Userform funktioniert das befüllen mehrerer Comboboxen aus verschiedene Tabellenblättern gut, und zwar über:
Private Sub UserForm_Initialize()
combobox1.List = Range("intelligenteTabelle1[Spalte1]").Value
combobox2.List = Range("intelligenteTabelle2[Spalte1]").Value
End Sub
Mit einer 2. Userform kann ich aber zum einen keinen zweiten Userform_Initialize() Event aufrufen, bzw. macht VBA das zwar, aber die Liste in der Combobox2 stimmt dann einfach nicht, bzw. wird dann auch die Liste der Combobox1 angezeigt, was auch Sinn ergibt, da der Initialize-Event sicherlich nur einmal vorkommen darf.
Zum anderen kann ich auch nicht die 2. Zeile von oben
combobox2.List = Range("intelligenteTabelle2[Spalte1]").Value
einfach in Userform1 packen, da sich ja die Combobox auf Userfom2 befindet und somit die Variable combobox2 nicht erkannt wird...
Wahrscheinlich steh ich auf dem Schlauch, aber ich komme nicht mehr weiter...
Grüße,
Streicher
Anzeige