Unless your pages are separated by manual page breaks or 'next page' Section breaks, there is no reliable way of doing this with VBA. That's because where a page starts & ends depends on the layout optimisations Word does for the active printer driver.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]