Search Cells and Replace Text in that cell

I am very new to Macros and writing VBA scripts. Here is what I am wanting to do. Search multiple cells for certain string and then replace the text of the entire cell with new text.

For example the text may contain:
"A Chestnut Leather Satchel Binocular Case "They'll Fight Over When You're Dead" (Binocularcase-SL-CH)"

I want to search for SL-CH and once that is found I want to replace the contents of the entire cell with the following:
Satchel Chestnut (SL-CH)

TIA