Pass a value from a combobox to a sub

[girapas]

From a sub, say subA, I load a userform with a combo box, say cboA.
I want to pass the value of the cboA selection to a variable (say x) to use it in subA.

 

[mikerickson]

The key that the OK button in Userform1 should hide the userform rather than unload it. (The Cancel button should unload the form.)

Sub foo()
    UserForm1.Show
    x = UserForm1.cboA.Value
    Unload UserForm1

    If x = vbNullString then Exit Sub: Rem user pressed Cancel
    Rem code for Sub A
End Sub

 

[girapas]

Thank you for the reply.