Bonjour, Merci pour ce travail qui vous a certainement pris beaucoup de temps.
Ce pendant, l'exécution de la macro s'arrête avec une erreur se rapportant au Case 5 : TabloSource(5, x - 1) = CDate(Trim(Contenu(i))).
il s'agit d'une erreur 13.
D'avance merci pour vos conseils.
Bien à vous.