Extracting text from Alphanumeric Cell
 

Is there VBA coding I can use for the following:

I have the following data

Clinical Team Manager 1
Clinical Team Manager 2
Clinical Team Manager 3
Project Manager 1
Project Manager 2
Project Director 1
Project Director 2
Project Associate 1
Project Associate 2
Project Associate 3
Project Associate 1 - Prod Reg
Project Associate 2 - Prod Reg
Project Associate 3 - Prod Reg

what I want the coding to do is to replace the data with only the job title so the text before the number. Does that make sense?

Thanks for any help.