View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
[email protected] aidan.heritage@virgin.net is offline
external usenet poster
 
Posts: 244
Default Pagebreak and Zoom problem (Unresolved)

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