I am working on the below excel that I had some help in to get a initial draft together.

The intent is to have a second sheet with one colum of "Full Names" and the next adjacent column is it's "Abbreviation/Short Form".
The first sheet has a user input where the person enters a word string and this VBA should search for a "full name string" match and replace it with its Short Form/Abbrevation. Also any spaces and dashes are replaced with a _ (underscore).
The issue is when each defined word is entered independently it returns the "Abbreviation/Short Form" fine, but when you enter another name, it no longer works. It then seems to only look for direct matches of the single words and puts their abbrevations. I want it to make sure to use "full name" matches and not just the single word matches.

Screenshot shows an example of this bug. What can be done to fix this? I've attached the xlsm file also.

Abbreviate_Rev4_10172016.xlsmCapture2.JPG