How to Remove salutation from name vba

Hi everyone, how can i remove mr. mrs. miss. in names in column E. I recorded a macro to the find and replace these types of names but is there an easier way to do it in vba? or even remove first word in a cell. I can figure the rest out myself. THanks in advance