Bonjour,
J'ai tout tenté, et je ne comprends pas pourquoi ma commande Userform1.show ne fonctionne pas.
Déjà parce que ce n'est pas Userform1 que tu lances à l'ouverture
Private Sub Workbook_Open()
UserForm2.Show False
End Sub
Ensuite, tu passerais en mode débogage -> pas à pas, tu comprendrais
....
'Trier les données par ordre date
' Si aucun tri actif, créé une erreur, pour contourner ça
On Error Resume Next
ActiveWorkbook.Worksheets("Feuil1").ListObjects("Tableau1").Sort.SortFields.Clear
On Error GoTo 0
....