Hi

My problem is when i try to cut and paste a combobox from one sheet t
another.

The thing is that i first update the combobox by the addItem function
then i cut the combobox and paste it in another worksheet. But when
paste it all the added items are lost. I have also tried to copy th
combobox to another worksheet, and everything seems fine with th
original combobox containing all the added items. This is the cod
sequence:

"an addItem loop adding the elements" then
ComboBox1.Cut
Workbooks("The workbook").Sheets("The sheet").Activate
ActiveSheet.Range("The Range").Select
ActiveSheet.Paste

What seems a bit strange to me, is when I manually with th
ListFillRange in properties add items to the combobox and cut/paste th
combobox everything goes just fine.

All help, is good hel

--
MBai
-----------------------------------------------------------------------
MBais's Profile: http://www.excelforum.com/member.php...fo&userid=2547
View this thread: http://www.excelforum.com/showthread.php?threadid=38980

You need to copy the code as well. Take a look at
www.cpearson.com/excel/vbe.htm

--

HTH

RP
(remove nothere from the email address if mailing direct)


"MBais" wrote in
message ...

Hi

My problem is when i try to cut and paste a combobox from one sheet to
another.

The thing is that i first update the combobox by the addItem function,
then i cut the combobox and paste it in another worksheet. But when i
paste it all the added items are lost. I have also tried to copy the
combobox to another worksheet, and everything seems fine with the
original combobox containing all the added items. This is the code
sequence:

"an addItem loop adding the elements" then
ComboBox1.Cut
Workbooks("The workbook").Sheets("The sheet").Activate
ActiveSheet.Range("The Range").Select
ActiveSheet.Paste

What seems a bit strange to me, is when I manually with the
ListFillRange in properties add items to the combobox and cut/paste the
combobox everything goes just fine.

All help, is good help


--
MBais
------------------------------------------------------------------------
MBais's Profile:
http://www.excelforum.com/member.php...o&userid=25476
View this thread: http://www.excelforum.com/showthread...hreadid=389800

Well, it might work to copy all code to another sheet. But in this case
it's not a very good idea im afraid. My program has become quite
complex. But if someone knows how to call a code sequence only once
when a combobox is selected, i think the problem will be solved. I've
tried subs as Combobox1_Click and
Combobox1_GotFocus, but they're called every single time the combobox
is "used".


--
MBais
------------------------------------------------------------------------
MBais's Profile: http://www.excelforum.com/member.php...o&userid=25476
View this thread: http://www.excelforum.com/showthread...hreadid=389800

Hi,

i don't know how to copy items added by AddItem with a combobox
at a time. but i suppose the following can copy items,

Dim varList As Variant
varList = ComboBox1.List
ComboBox1.Cut
Workbooks("The workbook").Sheets("The sheet").Activate
ActiveSheet.Range("The Range").Select
ActiveSheet.Paste
Selection.Object.List = varList

when i copy a combobox, the added items are lost always
whether by macro or manual operation. and they are not saved
in a workbook file. (Excel2000)

--
HTH,

okaizawa


MBais wrote:
Hi

My problem is when i try to cut and paste a combobox from one sheet to
another.

The thing is that i first update the combobox by the addItem function,
then i cut the combobox and paste it in another worksheet. But when i
paste it all the added items are lost. I have also tried to copy the
combobox to another worksheet, and everything seems fine with the
original combobox containing all the added items. This is the code
sequence:

"an addItem loop adding the elements" then
ComboBox1.Cut
Workbooks("The workbook").Sheets("The sheet").Activate
ActiveSheet.Range("The Range").Select
ActiveSheet.Paste

What seems a bit strange to me, is when I manually with the
ListFillRange in properties add items to the combobox and cut/paste the
combobox everything goes just fine.

All help, is good help