How can I copy a Combobox with all items, which is placed in cell "A1", to
another cell, maybe "A2" ?

Thanks in advance for any help !

Hans

Hi Hans

A2 and downwards:

Sheets(1).Range("A2").Resize(Me.ComboBox1.ListCoun t, 1).Value = _
Me.ComboBox1.List

HTH. Best wishes Harald

skrev i melding ...

How can I copy a Combobox with all items, which is placed in cell "A1", to another cell, maybe "A2" ?

Thanks in advance for any help !

Hans

Hi Harald,

thank you for your answer !

I have a combobox in cell "A1", now i will create a new combobox in cell
"A2" with the same items of the combobox in cell "A1" !

You have any idea ?

Thanks in advance,
Hans

Hi Hans

Not really. What kind of combobox is it, how did you create it ?

Best wishes Harald

skrev i melding
...
Hi Harald,

thank you for your answer !

I have a combobox in cell "A1", now i will create a new combobox in cell
"A2" with the same items of the combobox in cell "A1" !

You have any idea ?

Thanks in advance,
Hans

Hi Harald,

Not really. What kind of combobox is it, how did you create it ?

My combobox in cell "A1" contains many names, e.g. "Harald", "Hans",
"Susi", "Eva", ...
I have created this combobox manually with the mouse from a toolbar
without VBA
and have filled it with VBA (.addItem("Harald")).

Now, this existing Combobox in the cell "A1" must be copied with VBA to a
new not existing Combobox
in the cell "A2" (completely with all names) !

I hope, you understood me !?

Have a nice Sunday !

Hans

Hi Hans

Those combos aren't really in the cells, they are floating above them. Try
to use data validation instead:
http://www.contextures.com/xlDataVal01.html

HTH. best wishes Harald

skrev i melding
...

My combobox in cell "A1" contains many names, e.g. "Harald", "Hans",
"Susi", "Eva", ...
I have created this combobox manually with the mouse from a toolbar
without VBA
and have filled it with VBA (.addItem("Harald")).

Hi Harald,

Those combos aren't really in the cells, they are floating above them.
Try
to use data validation instead:
http://www.contextures.com/xlDataVal01.html

many thanks for this great Link, I think, you are a genius !

Have a nice day !

Hans