Set oRng = oTbl.Rows(lngRow).Cells(3).Range
    With oRng.Find
      .Text = "Task Statement"
      If .Execute Then
        oRng.InsertAfter ": "
        Do While IsNumeric(oRng.Characters.Last.Next)
          oRng.MoveEnd wdCharacter, 1
        Loop
        oRng.InsertAfter " "
        oRng.Collapse wdCollapseEnd
        oRng.InsertSymbol Font:="Times New Roman", CharacterNumber:=8211, Unicode:=True
        oRng.Collapse wdCollapseEnd
        oRng.Move wdCharacter, 1
        oRng.InsertAfter " "
      End If
    End With