ich habe folgende, hoffe einfache Frage an euch. Ich habe eine Userform mit zwei Comboboxen, die erste Combobox soll bei "Tabelle1" beginnen und die zweite Combobox soll bei der zweiten Tabelle beginnen(als zu sehende Tabellen). Im Moment sieht es so aus, das in beiden Comboxen der Tabellenname "Tabelle1" steht. Wie bekomme ich in die zweite Combobox die zu erwünschte Tabelle "Tabelle2" hin. Hier mein Code:
Private Sub UserForm_Initialize()
Dim Blatt As Worksheet
For Each Blatt In ThisWorkbook.Worksheets
If Blatt.Visible = True And Blatt.Name <> "Tabelle4" Then
ComboBox1.AddItem Blatt.Name
ComboBox2.AddItem Blatt.Name
ComboBox1.ListIndex = 0
ComboBox2.ListIndex = 0
End If
Next Blatt
End Sub
Wäre über Feedback dankbar.
Grüsse
Janni