How about this:
FOR i = 1 TO THIS.PageCount
IF THIS.Pages(i).Pageorder # THIS.ActivePage
THIS.Pages(i).Refresh()
ENDIF
ENDFOR
?
>>Hmmm...I have not run into this issue and I've used this code for many moons. I'll have to look into that and post some followup revised code.
>>
>
>If you haven't had it occur, it's 'cause you always design your pagesframes with the right number of pages to begin with. :-) I don't or can't. If you add pages later, and reposition the order, then ActivePage fails.
------------------------------------------------
John Koziol, ex-MVP, ex-MS, ex-FoxTeam. Just call me "X"
"When the going gets weird, the weird turn pro" - Hunter Thompson (Gonzo) RIP 2/19/05