MS Word macro to Find Previous occurrences of a searched term

When you search a Word document without using the new navigation bar, preferring the floating Find dialogue and a keyboard shortcut, it’s not easy to return to a result you’ve just passed by.

FindPrevious is a nice macro created by Jon Schneider. You can paste it in your macros, associate it with keyboard shortcut such as Shift+F3 and use it to reverse temporarily the Find direction, returning to results just skipped.

Sub FindPrevious()
  
   DoFind False

End Sub

Sub DoFind(findDirection As Boolean)

   Dim initialFindDirection As Boolean
   initialFindDirection = Selection.Find.Forward

   Selection.Find.Forward = findDirection
   Selection.Find.Execute
  
   Selection.Find.Forward = initialFindDirection

End Sub

contact the Editor of TheFreeWindows   Get The Power
don't miss   : :   Sleeper   Favorite Launcher   Savy   Gadgetarian
Gadgibility   Power Copy   Windows Rule   SearchALL Gadget   Amazon Gadget