Jeff,
Before you go, make sure you used the revised code I just posted to Charlie and repeated here:
FOR i = 1 TO THIS.PageCount
IF THIS.Pages(i).PageOrder # THIS.ActivePage
THIS.Pages(i).Refresh()
ENDIF
ENDFOR
>Thanks! Your solution worked great! One less thing to worry about now.
>
>Have a great day!
>
>Jeff
------------------------------------------------
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