Come metto l'apice in una objRegExp.Pattern ?

[wildsurf]

Ciao a tutti uso objRegExp.Pattern per testare la validità di un indirizzo e-mail:

   objRegExp.Pattern = "^[a-z0-9._-]+\@[a-z0-9._-]+\.[a-z0-9]{2,4}$" 
	 objRegExp.IgnoreCase = True 
	 IsEmail = objRegExp.Test(strEmail)

Ma come faccio a fargli considerare nel primo blocco di caratteri anche l'apice ?
Se scrivo così non va bene:

objRegExp.Pattern = "^[a-z0-9._-' ]+\@[a-z0-9._-]+\.[a-z0-9]{2,4}$"

E non funziona neanche mettendo la barra \ prima dell'apice.
Come devo fare ???
Grazie