Salut,
Pas sûr d'avoir tout compris surtout cette histoire d'insertion ? En collant ce code dans le module de ta feuil2 (clic droit/visualiser le code)
Const Plage As String = "A6:C34"
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range(Plage).Columns(3)) Is Nothing Then
With Range(Plage)
.Sort .Cells(1, 3), xlAscending
End With
End If
End Sub
ça te conviendrait? si on insère une valeur dans la colonne C (C6:C34 ici ) alors on trie la plage A6:A34
A+++