Poblème sur ce classeur

[JACMIC]

Bonjour à tous,

J'ai trouvé ce classeur sur le site et comme il peut me rendre de grands services
je l'ai téléchargé et je voudrais pouvoir l'utiliser.

J'ai du le modifier un peu.

Ce qui me gène c'est qu'il ne respecte pas la mise en page de la feuille modèle lors de la copie.

Comment le faire ?

Si quelqu'un avait du temps pour regarder

Merci beaucoup

Si vous voulez des précisions, demandez

Merci beaucoup

Jacmic

 

[JACMIC]

Re : Poblème sur ce classeur

Bonsoir à tous,

J'ai trouvé une solution pour ma mise en page.
Je vous donne mon idée, si ça peux servir
Prendre la mise en page du modèle et le reporter ainsi :
With Sheets(Feuil1).PageSetup
.LeftMargin = Application.CentimetersToPoints(1)'Valeur marge gauche en cm
.RightMargin = Application.CentimetersToPoints(1)'marge droite .TopMargin = Application.CentimetersToPoints(2)'marge haut de page .BottomMargin = Application.CentimetersToPoints(2)'marge bas de page
.HeaderMargin = Application.CentimetersToPoints(1,3)'marge pour entête .FooterMargin = Application.CentimetersToPoints(1,5)'marge pour pied de page
End With

Si cela aide quelqu'un je n'aurais recherché que pour moi et en vain

Jacmic