Word does not make this easy, for good reason. What's a page, anyway?
You could change all your document's page breaks by selecting a
different printer without even touching the document itself.

You can get the number of the page on which a range ends with the
expression

    range.Information (wdActiveEndPageNumber)

To find the precise point where a page ends you must iterate or
perform a binary search.

If I were in your position, I would conclude that Word was telling me
not to do what I was trying to do. Perhaps it would be better to
delete everything except the first table in your document, or the
first section. Perhaps it would be wise to modify the structure of the
document, if necessary, so that one of those approaches will do what
you want.

My email address is LLM041103 at earthlink dot net.