Well, I've just spent several hours trying various combinations of punctuation and special characters and none of them has had any effect. The latest I've tried are:

.Pattern = "[a-z0-9!#$%&'*+/=?^_`{|}~-]+(?:\.[a-z0-9!" & _
"#$%&'*+/=?^_`{|}~-]+)*@(?:[a-z0-9](?:" & _
"[a-z0-9-]*[a-z0-9])?\.)+[a-z0-9](?:" & _
"[a-z0-9-]*[a-z0-9])?"

and

.Pattern = "[a-z0-9!#$%&'*+/=?^_`{|}~- ]"

I don't know how else to tell the code to identify hits as whole word matches if they adjoin these characters. Am I getting warm or still cold here?