page set up ???

[butchkmd]

I use this code to lay out my pagesetup

sht.PageSetup.PrintArea = ("A:n&quot
sht.PageSetup.BottomMargin = 0
sht.PageSetup.TopMargin = 0
sht.PageSetup.RightMargin = 0
sht.PageSetup.LeftMargin = 0
sht.PageSetup.CenterHorizontally = True
sht.PageSetup.CenterVertically = True
sht.PageSetup.Orientation = xlLandscape
sht.PageSetup.PrintGridlines = True
sht.PageSetup.FitToPagesWide = 1
sht.PageSetup.FitToPagesTall = 300

but when I run the program everything formats correctly except the "fit to pages wide". The 1 wide and 300 long is filled in the box but the option button is not selected. Once again...any help would be appreciated.

Matt

 

[BrainB]

FWIW I have seen this problem reported before. Not seen an answer though. May be a bug. I would check MS knowledgebase. Regards
BrianB
** Let us know if you get something that works !
================================