Private Sub CBxRisque_Change()
If Me.CBxRisque = "" Or Me.CBxRisque = "(vide)" Then Me.ListBoxResultat.Visible = False Else Me.ListBoxResultat.Visible = True
End Sub
et cette ligne à la macro UserForm_Initialize()
If Me.CBxRisque = "" Or Me.CBxRisque = "(vide)" Then Me.ListBoxResultat.Visible = False Else Me.ListBoxResultat.Visible = True