Sub ScratchMacro()
'A basic Word macro coded by Greg Maxey
Dim oRng As Word.Range
Set oRng = ActiveDocument.Range
  With oRng.Find
    .ClearFormatting
    .Text = "Safety Stock"
    If .Execute Then
      
      oRng.Select
      Selection.Expand wdLine
      Selection.Start = ActiveDocument.Range.Start
    End If
  End With
End Sub