Empêcher sélection/ListBox avec condition ComboBox

Bonjour le forum,

je sèche sur qq chose qui doit pourtant être très simple !

Ce que je veux réaliser :

Si aucune valeur (1 à 31) n'est sélectionnée dans un ComboBox (ComboBox1) alors il est impossible de venir cliquer dans une ListBox à MultiSelect (List_Effectif).

Cela fonctionne comme je veux mis à part qu'une fois la MsgBox affichée et validée, une sélection se fait quand même dans ma ListBox...

J'ai essayé divers morceaux de code pour éviter cela mais sans résultat...

Soit le code est mal écrit, soit il est mal placé, je ne sais pas :

Private Sub List_Effectif_Enter()

If ComboBox1.Value = "" Then
MsgBox "vide", vbExclamation
End If
Exit Sub

End Sub

Merci de m'apporter votre aide

bonjour,

A+

Il faut que je lui enlève les données sensibles, c'est pour cela que je ne l'ai pas joint. J'avais estimé qu'il n'y en avait pas besoin !