Pagebreak and Zoom problem (Unresolved)
Hello,
Maybe I should elaborate:
ActiveSheet.PageSetup.Zoom = 100 - i would reduce the zoom setting of the
page set-up by 1 each loop.
By reducing the zoom settings, the automatic page break created by excel
should also adjust thus changing the value of
ActiveSheet.VPageBreaks(1).Location.Address (I don't need the value of ith
pagebreak but only the first).
wrote in message
ups.com...
I'm confused - I've answered the question - you are looping through an
iteration of a loop i times, but each time you are displaying the
Location.Address of ActiveSheet.VPageBreaks(ONE) and not the i'th
VPageBreaks.
JON JON wrote:
Sorry if I sound impatient but I just really need help fast.
"JON JON" wrote in message
...
Please help!
"JON JON" wrote in message
...
Yes! that's one (1).
wrote in message
oups.com...
You've typed pagebreaks(ONE) not pagebreaks(i)
JON JON wrote:
Hello NG,
Anyone knows why I keep getting the same debug.print result using
the
code
below? Isn't in suppose to change? Any line of code that I need
to
add?
Please help!
Sub Testing()
Dim i As Integer
For i = 0 To 50
ActiveSheet.PageSetup.Zoom = 100 - i
Debug.Print ActiveSheet.VPageBreaks(1).Location.Address
Next i
End Sub
TIA
Jon-jon
|