In MS Word you could have an short cut key for "find next"

[Guest]

In MS Word you could have an short cut key for "find next" .so that it
searches for last searched keyword.
Senario:
we search for a word
we press escape key (to close the find wizard ) to have a full view of the
highlited text.
To search the same word again we have to go to the wizard and press find
next.
Instead if there is a short cut key it might be useful.

 

[Charles Kenyon]

On the right side of your screen at the bottom of the vertical scroll bar is
the object browser. It is for precisely this. Once you have done a find and
closed the dialog, clicking on the bottom double arrowhead will take you to
the next find. Clicking on the up double arrowhead will take you to the
previous one, clicking on the circle between them will open a selection
window to let you change what the browser looks for.
--
Charles Kenyon

Word New User FAQ & Web Directory: http://addbalance.com/word

Intermediate User's Guide to Microsoft Word (supplemented version of
Microsoft's Legal Users' Guide) http://addbalance.com/usersguide

See also the MVP FAQ: http://www.mvps.org/word which is awesome!
--------- --------- --------- --------- --------- ---------
This message is posted to a newsgroup. Please post replies
and questions to the newsgroup so that others can learn
from my ignorance and your wisdom.

 

[Guest]

Also, Ctrl+f will reopen the Find dialog box which retains the previous
content if you want to have the dialog box reappear for some reason. |:>)

 

[Andy]

n MS Word you could have an short cut key for "find next" .so that it

searches for last searched keyword.

This one will find the next instance of already highlighted text:

Sub FindNextSel()

On Error Resume Next

Dim FindText As String
FindText = Selection
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = FindText
.Forward = True
.Wrap = wdFindAsk
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = False
End With
Selection.Find.Execute

End Sub



This one will find the next instance of whatever you had in the Find
Dialog box:

Sub FindNext()
Selection.Find.Execute
End Sub


Assign a shortcut key to one or both.