obtener nombre de control combobox

[Solmar]

Muchas gracias JonathanB claro que tomo tus cometarios de manera cosntructiva como crecimiento. ha fincionado el agregar la inicializacion del combo pero a la hora de que se obtiene el valor del name me borra el contenido seleccionado del combo he probado cambiar la propiedad por un .text pero eso no me genera el error y no me borra el valor seleccionado del combo pero eso no me regresa el valor del nombre del combo que es lo que necesito, sin perder el valor seleccionado del combo por que ese valor se va agregar en un insert de otra funcion.
Private Function ComboPropietario() As ComboBox
Dim cbx1 As ComboBox
If cbxUNP.Visible Then
Set cbx1 = cbxUNP
ComboPropietario = cbxUNP
ElseIf cbxPromotorP.Visible Then
Set ComboPropietario = cbxPromotorP
ComboPropietario = cbxPromotorP.Text
Else
Set ComboPropietario = cbxGerenciaP
ComboPropietario = cbxGerenciaP.Text
End If
End Function



y una discula por publicar el codigo asi nuevamente peor es que no he encontrado al forma de hacerlo como me lo sugieres, espero no desesperarte saludos