changer la mise en page standard

F

francois

Guest
bonjour,

je voudrais sauvegarder une nouvelle mise en page. Ainsi, quand on ouvre excel ou que l'on crée un nouvelle feuille, je voudrais que les marges soient celles que je veux et pas le modèle excel

d'avance merci
 
S

STéphane

Guest
je ne vois pas trop comment, j'ai quand même mis au point une macro (bof) qui sélectionne la feuille crée et la feuille modèle Feuil1 en laissant active la feuille Feuil1, puis elle affiche la boîte de ddialogue de mise en page et la valide, ce qui applique la mise en forme de la page Feuil1 à la nouvelle page.

ce code est basé sur une procédure évènementielle relative au classeur.
il faut la coller dans la feuille de code du classeur lui-même.


Private Sub Workbook_NewSheet(ByVal Sh As Object)
Sheets(Array(Sheets("Feuil1").Name, Sh.Name)).Select
SendKeys "{enter}"
Application.Dialogs(xlDialogPageSetup).Show
Sh.Select

End Sub

bye
Stéphane
 

Discussions similaires

M
Réponses
9
Affichages
449
Maikales
M

Statistiques des forums

Discussions
311 722
Messages
2 081 930
Membres
101 843
dernier inscrit
Thaly