How in VBA do you test for the end of the document? After finding & selecting some text and modifying its font properties, I move over one character and want to see if I'm now at the end of the document - in which case, I'll stop - and if not at the end of the doc, I'll go to the start of the code and repeat the Find.

Thanks!

Larry Landis
Technical Writer

One way is to check the EndoFDoc bookmark

Here is a hint

Sub IsTheTextEOD()

If Selection.Range = ActiveDocument.Bookmarks("\EndofDoc").Range Then
   MsgBox "EOD"
Else
   MsgBox "Still need to move further...."
End If


End Sub

Cheers
Shasur

http://www.dotnetdud.blogspot.com

VBA Tips & Tricks (http://www.vbadud.blogspot.com)