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

Réponses
3
Affichages
672

Statistiques des forums

Discussions
299 954
Messages
1 980 345
Membres
207 064
dernier inscrit
mihindou arved