page setup

[duplaly]

bonjour
j'ai un code vba qui fais la mise en page automatique.
ActiveSheet.PageSetup.PrintArea = Range("A1:I" & Range("A65536").End(xlUp).Row).Address

j'ouvre mon fichier sur excel 2007 et la mise en page ne se fait plus. en lançant la macro les colonnes perdent leur largeur.
un peu d'aide.
Merci

 

[phlaurent55]

Re : page setup

bonjour duplaly,

essaie ceci:

ActiveSheet.PageSetup.PrintArea = "A1:I$"&Range("A65536").End(xlUp).Row)

à+
Philippe