Word Micro Utility - ViewSelection

["Steve Hudson" <steve -at- wright -dot- com -dot- au>]

When one wants to ensure the selection is on screen, call this wee macro.
After too much <bad scottish accent> mookin abowt </bad scottish accent>
I've gone with this as the easiest solution.


Sub ViewSelection()
    Const TempBookmark As String = "ViewSelectionTempBookmark_Please_Delete"
    ActiveDocument.Bookmarks.Add TempBookmark, Selection.Range
    Selection.GoTo wdGoToBookmark, , , TempBookmark
    ActiveDocument.Bookmarks(TempBookmark).Delete
End Sub

Steve Hudson , HDK List MVP
Wright Technologies Pty Ltd (Aus)





^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Be a published author!  iUniverse gives you: a high-quality paperback, a
custom cover design, and distribution to 25,00 retailers.  Join our almost
10,000 published authors today. http://www.iuniverse.com/media/techwr

Have you looked at the new content on TECHWR-L lately?
See http://www.raycomm.com/techwhirl/ and check it out.

---
You are currently subscribed to techwr-l as: archive -at- raycomm -dot- com
To unsubscribe send a blank email to leave-techwr-l-obscured -at- lists -dot- raycomm -dot- com
Send administrative questions to ejray -at- raycomm -dot- com -dot-  Visit 
http://www.raycomm.com/techwhirl/ for more resources and info.