Bonjour,
Suggestion d'utiliser l'évènement Activate de la feuille infos pour mettre à jour le tri :
Private Sub Worksheet_Activate()
Me.Range("B1").Resize(Me.Range("B1").End(xlDown).Row, 11).Sort key1:=Me.Range("K1"), _
order1:=xlDescending, key2:=Me.Range("L1"), order2:=xlDescending, key3:=Me.Range("C1"), _
order3:=xlAscending, Header:=xlYes, MatchCase:=False
End Sub
Le plus économique a-priori...
Remarque : Les procédures évènementielles ne peuvent fonctionner que dans le module de l'objet concerné par l'évènement...
Cordialement.