I'm new to Reg Expressions and VB script, but after doing some seaches, I found that the following works well to return the first value...
Set re = New RegExp
With re
.Pattern = "\b[A-Z0-9._%-]+@[A-Z0-9.-]+\.[A-Z]{2,4}\b"
.IgnoreCase = True
.Global = True
End With
Set matches =...