Sortir d'un combobox

[rudaye]

Salut le forum!!
De retour de vac bien reposantes, je reviens à la charge !

Voilà j'ai un combobox et je voudrais ne pas pouvoir en sortir tant que je n'ai pas sélectionné un objet de cette combobox

Et si j'essai d'aller dans une autre textbox de mon userform , je voudrais qu'il me mette un message du type:

Msgbox('Veuillez sélectionner un mois!')

merci

 

[Grantourismo]

Bonjour,

Dans tes textbox tu peux utiliser :

If [nomcombobox].Value = '' Then
Call MsgBox('vous devez choisir Une Valeur', vbCritical, 'Erreur')

Je ne sais pas si je répond à ta question...

Bon courage

 

[rudaye]

salut grantourismo et merci!

J'ai fais comme ça :

Private Sub TextBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If [ComboBox2].Value = '' Then
Call MsgBox('vous devez sélectionner le mois concerné!', vbCritical, 'Erreur')
End If
End Sub


et c'est ce que je voulais merci!

 

[myDearFriend!]

Bonjour rudyperray, Grantourismo,

En complément, je me permets de vous soumettre peut-être une autre façon de procéder :

Private Sub ComboBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
      If ComboBox1.ListIndex < 0 Then
            MsgBox 'vous devez sélectionner le mois concerné!', vbCritical, 'Erreur'
            Cancel = True
      End If
End Sub

Cordialement,

 

[rudaye]

salut MyDearFriend!

Merci pour le complément mais je crois que je vais utiliser la façon de
grantourismo


Merci

 

[rudaye]

Parce que j'utilise un bouton de sortie EXIT :

Private Sub CommandButton2_Click()
Unload Me
End Sub

et si je clic j'ai le msg d'erreur ce qui est normal !

Si je dois faire une modif ! laquelle?

MERCI