Word VBA - Check for last page

[Mike555]

Is there VBA code that can be used in MS Word to check if you are currently on the last page of a document? I'm trying to write a module that says

If you are on the last page Then
do something
Else
do something else

Thanks!

--
Mike

Why make it simple and efficient when it can be complex and wonderful?

 

[SkipVought]

Mike,

the last page is...

ActiveDocument.BuiltInDocumentProperties(wdPropertyPage)

Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884

Skip,

http://www.TheOfficeExperts.com

 

[Mike555]

Hi Skip,

One thing - should the code be ActiveDocument.BuiltInDocumentProperties(wdPropertyPages) Also, I should have been more specific in my post... I'm trying to implemet a loop that uses loops if you are not on the last page. It looks like this...

Do
Do While ActiveDocument.BuiltInDocumentProperties(wdPropertyPages) = False
(Do syntax)
Exit Do
Loop
Loop Until ActiveDocument.BuiltInDocumentProperties(wdPropertyPages) = True


Is this correct, because it doesn't seem to be working. When I run it, Word goes into an 'unresponsive' state and I get a popup saying that Word is not responding.

Thanks.

--
Mike

Why make it simple and efficient when it can be complex and wonderful?

 

[Mike555]

Nevermind, I figured this one out.

Thanks.

--
Mike

Why make it simple and efficient when it can be complex and wonderful?