Just testing code

[marshallgrad]

Lets see how tis works

[VBA]
Private Sub CommandButton1_Click()
CRITICAL_CALL_LIST.Hide
namechoosen = ComboBox1.Text
MsgBox namechoosen

End Sub
[/VBA]