@maximob Je n'ai pas de 1ére AC1.
Et tu l'as changé ou le nom de la classe, en paramètres ?
Moi si je le change en paramètres, j'ai toujours la même liste déroulante, et rien ne plante.
@78chris , tu sais ou est elle cette "table_classe" ?
merci
Private Sub Cbo_Classe_Change()
Dim Cel As Range
If Me.Cbo_Classe.ListIndex = -1 Then Exit Sub
Table_Classe = Me.Cbo_Classe.Text
For Each Cel In Sh_Para.Range("Table_" & Table_Classe).Cells
Select Case Cel.Text
Case Is = "LV2"
Me.FraLv2.Visible = True
Exit Sub
Case Else
Me.FraLv2.Visible = False
End Select
Next
End Sub
Merci