A macro built in excel suggests the code should be

.zoom = "False"

either way, your code or the above, I get an error that says "Unable to set the property of the PageSetup class..."



>Try to add
>

>    .Zoom = 0
>

>>Given the following code
>>

>>with oExcel.ActiveSheet.PageSetup
>>    .LeftMargin = .35
>>    .RightMargin = .35
>>    .FitToPagesWide = 1
>>    .FitToPagesTall = 1
>>endwith     	
>>

>>
>>Why doesn't the fit to pages function work? My sheet is still spread over 4 pages.
>>There is no error, just nothing seems to be different.
>>
>>Thanks