Simple ComboBox Question

Carrying over combobox values--

Say I want The Value of ComboBox1 on Sheet 1 to carry over so that the value of ComboBox1 on Sheet 1 is exactly the same.

What is the code for that? I'm sure this is incredibly easy but I cannot figure it out.

-thanks

Hello JLarkin,

It is not clear from your post what you want to do. I suspect you want to be able to retrieve, set or clear the contents of the ComboBox. Use a fully qualified reference to the ComboBox and you should not have any problems.

Example of returning text from ComboBox on Sheet1...

Text = Worksheets("Sheet1").ComboBox1.Value

Hope this helps,
Leith Ross

I should have been more clear..


On sheet1 I have a Combobox (the control toolbox, not the Forms one)

and on sheet2 I have another ComboBox (again from the control toolbox)

I need the Combobox on Sheet2 to mirror the ComboBox on sheet 1.

So basically Sheet1.comboxbox1.value will always = Sheet2.ComboBox1.value

I know, I know... i should be able to figure this out... but it's been bugging me for a while.

double click checkbox in Sheet1(design mode) and paste the below code


Private Sub CheckBox1_Click()
Sheets("Sheet2").CheckBox1.Value = ActiveSheet.CheckBox1.Value
End Sub

I tried that...

unfortunately it's not working...

Is there any error message, if there is no error message then I think you didnot past the code in correct location

Private Sub ComboBox1_Change()

Sheets("Sheet1").ComboBox1.Value = Activesheet.ComboBox1.Value

End Sub



This is what I have... oh and no error message...

nvermind... I figured it out... I did have it in the wrong place.

If there is no error that means it is working. How many comboboxes do you have in eachsheets.

Try to use this code, just seeing whether the code is invoked. It will alert "Hello I am working" if it is invoked.

Private Sub ComboBox1_Change()

msgbox "Hello I am working"

Sheets("Sheet1").ComboBox1.Value = Activesheet.ComboBox1.Value

End Sub