Page Setup/Print Preview vba question

[dgolds]

I am testing some code to have my sheets print consistently on different computers. I have

    With ActiveSheet.PageSetup
        .CenterHorizontally = True
        .Orientation = xlPortrait
        .FitToPagesWide = 1
    End With
    ActiveSheet.PrintPreview

but it still previews at more than 1 page wide. Any suggestions?
Thanks,
Dave

 

[sschrupp]

Re: darn cancel

Hmm, my company is using Excel 2000, and EnableChanges:=False doesn't seem to grey any of the print preview buttons out.