adding email

Hi, I have some VBA code that will search some cells and activate an e-mail when I click a command button.
However, I would like to develop this further to notify other indivividuals if a cell (O8) has the word "yes" but do nothing if its unpopulated.
Can anyone help?

I have had to include code as a note book attachment as the firewall will not allow me to display the code, apologies for breach of forum rules.

Thanks