Ajouter une page dans classeur Excel VBA
Bonjour à tous !
Je sollicite votre aide car je suis dans l'impasse.
Ma classeur comporte plusieurs feuilles. Dans chacune de ces feuilles on y trouve un tableau. Ma macro me permet de copier chacun de ces tableaux puis de les coller dans ma "Feuil1" pour créer mon rapport.
Cependant, je possède aussi une feuille "P de garde" et "Consigne de sécurité".
J'aimerai modifier ma macro pour pouvoir coller respectivement les feuilles "P de garde" et "Consigne de sécurité" avant et après ces tableaux..
Si ma question n'est pas clair n’hésitez pas à me poser des questions.
La macro en question est dans le Module 4
En vous remerciant !
Bonjour leeo01,
Si j'ai bien compris ton problème, je te propose le code VBA :
Sheets("P de gard").Move Before:=Sheets("Feuil1")
Sheets("Sécurité").Move After:=Sheets("Feuil1")Bonjour et merci pour l’intérêt que tu portes à ma demande!!
Je me suis mal exprimé. J'aimerai intégré ces deux feuilles, DANS ma Feuil1. J'aimerai intégrer ma page de garde dans Feuil 1 pour ensuite créer mon rapport..
Je ne veux pas déplacer ces classeurs avant et après Feuil1 mais plutôt intégrer ces deux feuilles à Feuil1.
Ai je été plus clair ?
En te remerciant
leeo01,
Effectivement, j'avais mal compris ton problème.
Je poursuis et te tiens informé.
J'ai modifié la macro du module4 dans le fichier joint.
Bonjour et merci pour ta macro!!
J'ai encore un petit soucis, au niveau de la mise en forme..
En effet quand la feuille "P de garde" est copié, la mise en forme n'est pas conservé, par rapport à ma zone d'impression.
En effet, l'image s’agrandit, le litre n'est plus centré etc..
J'ai essayé d'enlevé l' "autofit" mais rien n'y change..
Aurais tu une idée ?
En te remerciant et te souhaitant un bon week end
*Voici la PJ
Bonjour Leeo01,
Les défauts que tu signales proviennent du fait que la page de garde est formatée de manière différente à la feuille récapitulative "Feuill1".
Pour avoir un rendu homogène il est nécessaire que tu formates les pages de façon similaire, sinon, je ne vois pas...