Salut PetitClaude et le forum,
Ravie d'avoir 5 minutes pour venir vous voir.
Pour effectuer le tri par dates tu doit insérer cette ligne juste avant le Unload Me:
Range("B6:N" & ActiveCell.Row).Sort Range("B6"), xlAscending, , , , , , xlYes
Pour ce qui est des sommes elles ont foncitonnées correctement avec moi..
A bientôt
Valérie