Combobox mitsamt Listfillrange kopieren
22.02.2020 20:14:19
Markus
Ich möchte eine Combobox mittels VBA kopieren. Gibt es einen Befehl oder eine Funktion mit der ich die Listfillrange mit kopieren kann?
Bisher habe ich es mit:
For i = 1 To B
Worksheets("Eingabe").Shapes.Range(Array("ComboBox5")).Select
Selection.Copy
Worksheets("Eingabe").Cells(19 + i, 7).PasteSpecial
Next i
versucht.
Dabei wird die Combobox kopiert, aber ohne Listfillrange.
Wie man sehen kann werden die Comboboxen in einer Schleife erzeugt, so dass es nicht immer die selbe Anzahl ist. Daher kann ich sie nicht direkt Ansprechen sondern muss dort eine andere Lösung finden.
Vielleicht weiß ja jemand Rat.
Danke schonmal,
Markus