Copy From Combobox to Cell

[Tim Duell]

When I set boundcolumn to 0 the code will work, but the value of the
combobox will not stay when file is saved and reopened. When I say value I
mean the text displayed in the box. When bound column is set to 1 the code
will not work, or does not have the desired outcome, No information shows up
in cell E4, but the value, text displayed, will not stay when file is saved
and reopened. What am I doing wrong?

Private Sub ComboBox10_Change()

If ComboBox10.Value = 0 Then
Range("e4").Value = " "
ElseIf ComboBox10.Value = 1 Then
Range("e4").Value = "Urgent"
ElseIf ComboBox10.Value = 2 Then
Range("e4").Value = "Routine"
End If

End Sub

Thanks so much for all the help.

Tim Duell
Buckeye Shapeform

 

[Tim Duell]

Thanks for responding and the idea. Your idea ended with the same results.
when boundcolumn is set to 0 code works but will not retain values. When
boundcolumn is set to 1 it will reatain values but code will not work. I
did notice one thing slightly different though. When boundcolumn was set to
0 and it did not retain values. It did retain the item number of the
combobox inplace of the text label it was given. If I could just get it to
retain the text value instead I would be golden. Any ideas.

Thanks so much

Tim Duell
Buckeye Shapeform

 

[Tom Ogilvy]

When you set boundcolumn to zero, it does return the index. That is how it
is designed. That is what the zero means you want.

Cell values don't change by themselves. Are you saving the workbook before
you close it - you say you are.

I am sure whatever you are doing is causing it.

 

[Tim Duell]

I appreciate the clarification on the Boundcolumn, I was not really sure
what It meant even after looking at the help. I also agree without a doubt
that I am doing something wrong. Do you have any ideas what it might be.

Thanks

Tim Duell
Buckeye Shapeform