ton fichier n'est pas de grande utilité, il n'est pas fonctionnel, on ne sait d'ailleurs pas ce que contient la cellule C1 dont tu parles dans
StrFile = Range("C1").Text , or je suppose que
le problème vient à l'ouverture du fichier, tu ne stipules pas la feuille à copier, donc par défaut, c'est la première
Workbooks.Open (StrFile)
Cells.Select
et si cette première feuille est celle de Décembre 2003, normal qu'il la traite et retraite encore en ignorant celle de Janvier 2004 ou alors, janvier 2004 est dans un 3ème fichier ? tu devrais fournir les fichiers types, que l'on puisse faire un pas à pas avec la touche F8, ou mieux, tu peux le faire toi même