Salut Michel !
Et oui, j'avance à grand pas surtout que tu n'as pas tout vu, j'aurais une dizaine de prix différents !
En tout cas merci ! J'ai un peu modifier le code car la copie de l'étiquette en A5 ne se faisait pas alors j'ai enlever le Set devant et hop ça a fonctionné !
Mais ce que je craignais s'est avéré dans la feuille Caisse, le fait qu'il y a un saut de page avec des lignes intercalées le code ne marche plus et surtout la ligne "lig = Columns(1).Find(jour, [A1], , , xlByRows).Row"
Tout fonctionne jusqu'au 19/01/2004 et quand je passe au 20/01/2004 vla ti pas un débogage !
C'est pour ça que je disais Attention ! Un mois par page (Janvier en Page 1, Fevrier en Page 2, Mars en page 3 etc.) et en plus le nombre de lignes entre deux tableaux peut changer (enfin ça je suis pas sûr que ç'est très important ?)
Je te renvoie le fichier modifier, finalement reste plus que ce problème de saut de page à résoudre
Chez moi y a du soleil avec euuuuuhh quelques nuages. lol
@+
Scalpa