I want to set fit to one page first then to change to a specific zoom (e.g. 50%) if it's less than that after the fittoonepage. However it gives me an error when I tried to flip the zoom from false to true:

with sheet1.pagesetup
.zoom=false 
.fittopagestall=1
.fittopageswide=1

.zoom=true
if .zoom<50 then
   .zoom=50
   .fittopageswide=1
end if
end with
I got a runtime error 1004 of unable to set the zoom property. Many thanks!

April