Retrieve Data Using Find Function And Selecting Nearby Cells

Thanks a lot for the guidance. Is this how you are supposed to post the code? Sorry, I am new at this and really appreciate the help.

    ActiveSheet.Next.Select
    Cells.Find(What:="name and address", After:=ActiveCell, LookIn:= _
        xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
        xlNext, MatchCase:=False, SearchFormat:=False).Activate
    Range("B14").Select
    Selection.Copy
    ActiveSheet.Previous.Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("B1").Select

I've also added the attachment. I had to delete the actual data but if you are trying to pull information from cells in column B or C based on their relation to the cell with the control find. Hopefully that gives you a more clear picture.

Again thanks for the help and let me know if I'm missing anything.