Как через OLE вытащить значение комбобокса экселевского?? - VB

<font color="blue">Dim</font> xws <font color="blue">As</font> Excel.Worksheet
 <font color="blue">Dim</font> fcb <font color="blue">As</font> MSForms.ComboBox
 <font color="blue">Set</font> xws = ... <font color="00AA00">'полученная как-нибудь ссылка на Excel.Worksheet</font>
 <font color="blue">Set</font> fcb = xws.OLEObjects(<font color="teal">"Combobox1"</font>).<font color="blue">Object</font>
 ... <font color="00AA00">'имеем что хотим от fcb</font>
 <font color="blue">Set</font> fcb = <font color="blue">Nothing</font>
 <font color="blue">Set</font> xws = <font color="blue">Nothing</font>