Usine à gaz
XLDnaute Barbatruc
Bonjour à toutes et à tous,
Grâce à Laurent (encore Merci au passage), j'ai pu terminer (ou presque) mon code qui est dans le fichier test joint.
Il me reste une dernière étape que je n'arrive pas à codifier malgré essais et recherches.
Vous le verrez (dans le code de ma macro), je copie des infos de la feuille 1 vers la feuille 2.
J'ai 4 séries de plages à copier et j'en suis à copier plage par plage.
J'utilise le code : ActiveSheet.Cells(Rows.Count, "i").End(xlUp)(2).Select pour positionner les copies Feuille2
Pour être certain de tout copier au bons endroits, quelques soient les vides de mes plages et pour raccourcir mon code, j'aimerais faire la copie en une seule fois.
c'est à dire que le code me sélectionne les 4 plages en même temps et copie à partir de la 1ère cellule vide de la colonne "I" de la feuille 2.
J'espère m'être pas trop mal expliqué pour un dimanche matin LOL.
Je vous remercie pour votre aide.
Bon dimanche à toutes et à tous,
Amicalement,
Lionel,
Grâce à Laurent (encore Merci au passage), j'ai pu terminer (ou presque) mon code qui est dans le fichier test joint.
Il me reste une dernière étape que je n'arrive pas à codifier malgré essais et recherches.
Vous le verrez (dans le code de ma macro), je copie des infos de la feuille 1 vers la feuille 2.
J'ai 4 séries de plages à copier et j'en suis à copier plage par plage.
J'utilise le code : ActiveSheet.Cells(Rows.Count, "i").End(xlUp)(2).Select pour positionner les copies Feuille2
Pour être certain de tout copier au bons endroits, quelques soient les vides de mes plages et pour raccourcir mon code, j'aimerais faire la copie en une seule fois.
c'est à dire que le code me sélectionne les 4 plages en même temps et copie à partir de la 1ère cellule vide de la colonne "I" de la feuille 2.
J'espère m'être pas trop mal expliqué pour un dimanche matin LOL.
Je vous remercie pour votre aide.
Bon dimanche à toutes et à tous,
Amicalement,
Lionel,
Pièces jointes
Dernière édition: