View Single Post
 
Old 02-01-2014, 09:00 PM
BobBridges's Avatar
BobBridges BobBridges is offline Windows 7 64bit Office 2010 32bit
Expert
 
Join Date: May 2013
Location: USA
Posts: 700
BobBridges has a spectacular aura aboutBobBridges has a spectacular aura about
Default

Heck, if he wanted to increase Zoom until it was up to 40, all he'd have to do is say
Code:
 If .Zoom < 40 Then .Zoom = 40
(I speak under correction, because I've never done anything with Zoom in VBA.) I think he's saying that he wants to keep on adding pages until the zoom is at least 40%. I was staring at this earlier this evening — feeling sorry for him because none of us had answered him, I guess — and didn't know what to say because I don't know that adding pages (whatever that means) would affect the zoom.

In other words, he wants a loop like this:
Code:
Do While .Zoom < 40
  .FitToPagesWide = .FitToPagesWide + 1
  Loop
But would that affect the zoom? I don't know how that works.
Reply With Quote