Combobox mit Werten füllen
Juliane
ich bin gerade sowas von auf dem Kopf gefallen, ich versteh gar nichts mehr.... Also hab ne Combobox auf mein Tabellensheet gelegt. U jetzt möchte ich diese Combobox mit Werten aus einem anderen Tabellensheet füllen.
Hab es folgendermaßen probiert, aber funktioniert null :(
Sub Makro1()
ActiveSheet.OLEObjects.Add(ClassType:="Forms.ComboBox.1", Link:=False, _
DisplayAsIcon:=False, Left:=60, Top:=78.75, Width:=119.25, Height:= _
22.5).Select
End Sub
Sub c_box_füllen()
Dim rng As Range
Set rng = Sheets("Test").Range("A2:A11")
Sheets("Filter").ComboBox1.ListFillRange = "Test!" & rng.Address
End Sub
Für Hilfe wäre ich meeega dankbar
Anzeige