Excel 2013 - VBA Find and Replace

Untested, but is sound to my eye. In your Excel workbook

1) create a sheet called LIST
2) List the SEARCH strings in column A
3) List the REPLACE strings in column B

NOTE: Be wary of small search strings that might be a "substring" of other search strings. Order your LIST by the longest searches to the smallest, that should help.

4) Now run this macro from that same workbook

Sub DocSearch()
Dim wdApp As Object, wdDoc As Object
Dim SrchRNG As Range, SrchVAL As Range

Set SrchRNG = ThisWorkbook.Sheets("LIST").Range("A:A").SpecialCells(xlConstants)
    
Set wdApp = CreateObject("word.application")
wdApp.Visible = True
Set wdDoc = wdApp.Documents.Open("C:\Documents and Settings\Owner\My Documents\downloads\work\M-F-380.1.doc")
    
For Each SrchVAL In SrchRNG
    With wdDoc.Content.Find
        .Text = SrchVAL.Text
        .Replacement.Text = SrchVAL.Offset(, 1).Text
        .Wrap = wdFindContinue
        .Execute Replace:=wdReplaceAll
    End With
Next SrchVAL

Set wdApp = Nothing
Set wdDoc = Nothing
End Sub