Çözüldü Combobox boş geçilmesin

[sirkülasyon]

If ComboBox8.Value = "" Then
MsgBox ("Personelin Zorunlu Hizmet Durumunu Girmediniz Boş Geçmeyin!!!")
Exit Sub
End If

Uyarısını veriyorum. Ek olarak da imlecin boş olan ComboBox8' a gitmesini nasıl sağlayabilirim?

Teşekkür ederim.

 

[Necdet]

Merhaba,

    If combobox8.Value = "" Then
        MsgBox ("Personelin Zorunlu Hizmet Durumunu Girmediniz Boş Geçmeyin!!!")
        combobox8.SetFocus
        Exit Sub
    End If

 

[sirkülasyon]

Necdet Abi
Teşekkür ederim

 

[Orion1]

Alternatif.;

Private Sub ComboBox8_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If ComboBox8.Value = "" Then
    MsgBox "Combobox8'i boş geçtiniz!", vbCritical, "UYARI"
    Cancel = True
    Exit Sub
End If
End Sub