pb de mise en page a l'enregistrement

[fenec]

Boujour le forum

Tout est dans le titre mais je vous expique quand meme

Dans mon dossier j'utilise une macro pour enregistrer une sauvegarde qui fonctionne tres bien mais mon soucis est que la sauvegarde n'a pas du tout la meme mise en page


Vous joint un fichier exemple

D'avance merci

 

[noviceAG]

Re : pb de mise en page a l'enregistrement

Bonjour fenec, le Forum,
Fais un essai comme ceci :

[COLOR="green"]'Range("Zone_d_impression").Copy[/COLOR]    Range("B6:S78").Select
    Selection.Copy
    ActiveWindow.Zoom = 75

 

[fenec]

Re : pb de mise en page a l'enregistrement

Bonjour noviceAG

Déja merci de ta réponse mais besoin de ton aide car je ne parviens pas à l'appliquer.

je recois une erreur de compilation,utilisation incorrecte de la propriété


Windows(nomfichier).Activate

Range("Zone_d_impression").Copy
Range ("B6:S78")
'Range("Zone_d_impression").Copy[/COLOR] Range("B6:S78").Select
Selection.Copy
ActiveWindow.Zoom = 75
'colle dans nouveau fichier
Windows(nomfichier1).Activate
ActiveSheet.Range("B6").Select

 

[noviceAG]

Re : pb de mise en page a l'enregistrement

Modifie :

''Range("Zone_d_impression").Copy

par :
    Range("B6:S78").Select
    Selection.Copy
    ActiveWindow.Zoom = 75
    Range("25:25,25:53").Select
    Selection.RowHeight = 15

Ca devrait aller

 

[fenec]

Re : pb de mise en page a l'enregistrement

re,
ca ne repond pas à mon attende la sauvegarde n'ayant toujours pas la largueur des colonnes ni la hauteur des lignes du fichier original
merci pour ton aide