You can do anything with VBA using the appropriate Object Model (in this case Word).

Public Sub CallWordSub
'some code that generates the text and path
call FindSomeWordText("YourSearchTerm", "C:\Documents and Settings\YourFile.doc")

End Sub

Public Sub FindSomeWordText(sWordText As String, sWordFilePath as string)
' Remember to Select Tools/References Microsoft Word Object Library

Set objWord = CreateObject("Word.Application")
objWord.Visible = True

Set objDoc = objWord.Documents.Open(sWordFilePath)
Set objselection = objWord.Selection

With objselection
    .Find.Text = sWordText
    .Find.Forward = True
    .Find.MatchWholeWord = True

    If .Find.Execute Then
        'do something here
    Else
        MsgBox "The search text was not found."
    End If
End With

Set objWord = Nothing

End Sub