Extract titles from string using VBA
Posted on 2013-11-07
I got a huge data list with column headers where the (German) titles need to be extracted from a string in Column G:
Now the strings in Column G say for example:
Prof. Dr. Dr. med. John Doe
Prof. Dr. Elvis Costello
Prof. Jane Forseth
Dr. Miriam Sensing
I would like to run a macro that searches for the following strings (only! whole terms, no parts of the strings) ...
... Prof. Dr. Dr. med.
... Prof. Dr.
and extracts the found strings and inserts them in column H in the respective row.
The original string in Column G is to remain the same.
Help is much appreciated. Thank you very much in advance.