tri par date

yblotiere

XLDnaute Occasionnel
Bonjour

j'ai trouvé ce code sur le forum l qui me permet de trier en fonction de la date
il fonctionne je l'es testé mais il commence ligne 5(titre de colonne) et ne traite que de A à D
mais voici mon problème
je souhaiterai l'adapté a mon fichier

la date est bien en colonne 4
la ligne va de A à W
le tri doit commencer a ce faire qu'a partir de la ligne 6
pouvez vous me donner des informations parceque je ne voit pas quel parametre je doit changé
merci

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Column = 4 Then
      Application.EnableEvents = False
      Range(Cells(1, 1), Cells(Rows.Count, 4).End(xlUp).Offset(0, 1)).Sort _
         Key1:=Range("D1"), Order1:=xlAscending, Header:=xlYes, _
         OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
         DataOption1:=xlSortNormal
      Application.EnableEvents = True
   End If
End Sub
 

yblotiere

XLDnaute Occasionnel
Re : tri par date

Re

si quelqu'un peut juste me mettre sur la piste et me traduire quelque élément pour que je puisse modifier et surtout comprendre
se qui se passe

j'ai mon fichier mais je ne veut pas le mettre car je veut absolument comprendre ce qui est fait et comment cela fonctionne

merci
 

Discussions similaires

Réponses
5
Affichages
280

Statistiques des forums

Discussions
312 487
Messages
2 088 833
Membres
103 971
dernier inscrit
abdazee