ich habe in Tabelle1 nach Tabelle2 kopiert und die Spalten A,B und C in Tabelle2 verknüpft. Jetzt möchte ich in Tabelle2 die Daten in eine Combo einlesen bekomme aber anstatt der Inhalte (sollten ja Produktnamen sein), NIX, die Combo liest gar nichts ein, erkennt also keine Inhalte. Gefüllt wird wie folgt:
Sheets("Tabelle2").Activate
With ActiveSheet
Dim aRow, i As Long
Application.EnableEvents = False
cboProdukt.Clear
aRow = Range("A65536").End(xlUp).Row
cboProdukt.AddItem "Produkt-Auswahl"
For i = 2 To aRow
cboProdukt.AddItem Cells(i, 1) & ", " & Cells(i, 2)
Next i
cboProdukt.ListIndex = 0
Application.EnableEvents = True
End With
Mach ich was falsch oder geht das generell nicht?
Danke für eure Hilfe.
Grüsse
Drazen