find/replace macro?

Hi Excel'rs

I have created a word list of about 40 or so words that I want to do a find and replace with their abbrievations. Now, I know I can go and record a macro and just open the find/replace option in excel and manually do each word. However, I knwo this list is only going to grow with time. Is there a way to name each column of words a range and build a macro that goes line by line... finding for example the word debit and replacing it with dr?/

Thanks

JP