Bonjour,
il faut revoir le code de ton Userform initialize()
As-tu supprimé des onglets nécessaires ? par exemple un onglet "Menu" pour tes combobox ?
En attendant j'ai suspendu les actions du initialisze() et il s'ouvre.
Private Sub UserForm_Initialize()
'
'Dim x%, iNb%, sCol$
'
'Récupération des Données
'ComboBox1.RowSource = "Menu!A2:A3"
'ComboBox2.RowSource = "Menu!B2:B3"
'
'With Worksheets("Enfant")
'For x = 3 To 112
' sCol = Split(.Columns(x + 20).Address(ColumnAbsolute:=False), ":")(1)
' iNb = WorksheetFunction.CountIf(.Range(sCol & "3:" & sCol & .Range(sCol & .Rows.Count).End(xlUp).Row), "X")
' Me.Controls("CheckBox" & x).Enabled = IIf(iNb >= .Range(sCol & 3).Value, False, True)
' Me.Controls("CheckBox" & x).Value = False
' Me.Controls("lNb" & x).Caption = CStr(.Range(sCol & 3).Value - iNb)
' Next
'End With
'
End Sub
Enlever l'apostrophe devant pour réactiver.