It didn´t work for me. So do u mean that after running my code that creates a
combobox with two alternative A and B. You can change form A to B and reach
the current Value in the combobox using:

Sub showbox()
MsgBox ActiveSheet.OLEObjects(1).Object.Value
End Sub

and it will return B?