Combobox Listfillrange andere Tabelle
29.03.2020 21:29:43
Markus
Um eine Combobox dynamisch befüllen zu können möchte ich ihr die List Fill Range mittels vba zuweisen und einen Rows.Count Befehl einbauen.
Das Problem ist jedoch, dass sich die Daten für die ListfillRange auf einem anderen Tabellenblatt befinden. Jegliche Versuche bringen mich nicht weiter. wks11 wird in meiner Codezeile einfach ignoriert und die entsprechenden Zellen von wks1 werden genommen.
Private Sub ComboBox1_Change()
Dim wks1 As Worksheet, wks11 As Worksheet
Set wks1 = Worksheets("Eingabe")
Set wks11 = Worksheets("Umrechn. PDS-EQU")
wks1.OLEObjects("Combobox5").ListFillRange = wks11.Range(wks11.Cells(7,4), wks11.Cells(Rows. _
Count,4).End(xlUp).Rows).Address
End Sub
Danke schon mal,
Markus