Microsoft Office Forums - View Single Post - Search and goto

Thread: Search and goto

View Single Post

Old

03-21-2020, 09:26 PM

gmayor

gmayor is offline

gmayor uses Windows 10

Windows 10 gmayor uses Office 2016

gmayor uses Office 2016

Office 2016

Expert

Join Date: Aug 2014

Posts: 4,137

gmayor has much to be proud of

gmayor has much to be proud of

gmayor has much to be proud of

gmayor has much to be proud of

gmayor has much to be proud of

gmayor has much to be proud of

gmayor has much to be proud of

gmayor has much to be proud of

gmayor has much to be proud of

Default

You could have recorded that, however call the macro below with the value from your text box.

Code:

Sub FindWord(sWord As String)
    With Selection.Find
        .ClearFormatting
        .Replacement.ClearFormatting
        .Text = sWord
        .Execute
    End With
End Su

__________________
Graham Mayor - MS MVP (Word) (2002-2019)
Visit my web site for more programming tips and ready made processes www.gmayor.com

Reply With Quote