Combobox_Click Clikker for tidlig.

Disse procedurer er jeg ved at bygge, men jeg kan ikke forstå at den kører Click-sub'en med det samme - den skulle gerne vente på mit valg - hvad er forkert??

Private Sub Comskab_Click()
    Select Case Comskab.Value
    Case 0  ' ""
    MsgBox ("du valgte ingenting")
     
    Case 1 'Brochureskab
    MsgBox ("du valgte Brochureskab")
   
    Case 2 'Skab 1
    MsgBox ("du valgte Skab 1")

    Case 3 'Skab 2
    MsgBox ("du valgte Skab 2")
    Case 4 'Pulten
    MsgBox ("du valgte Pulten")
   
    Case 5 'Bagreolen
    MsgBox ("du valgte Bagreolen")
End Select


MsgBox ("ja")
Unload Me

End Sub

Public Sub UserForm_activate()

    Comskab.Clear
            Comskab.AddItem ""                  'ListIndex = 0
            Comskab.AddItem "Brochure skab"    'listindex = 1
            Comskab.AddItem "Skab 1"            'listindex = 2
            Comskab.AddItem "Skab 2"            'listindex = 3
            Comskab.AddItem "Pulten"            'listindex = 4
            Comskab.AddItem "Bag reolen"        'listindex = 5
    'Use drop-down list
    Comskab.Style = fmStyleDropDownList
    'Combo box values are ListIndex values
    Comskab.BoundColumn = 0
    'Set combo box to first entry
    Comskab.ListIndex = 0
           
End Sub

Håber snart at høre jeres kloge svar...