Adaptando A técnica de Bill Manville , isso deve funcionar para você. Vá para Validação de dados e selecione Personalizado . Digite esta fórmula (assumindo que seu endereço de e-mail está na célula A2):
=AND(ISERROR(FIND(" ",A2)),LEN(A2)-LEN(SUBSTITUTE(A2,"@",""))=1,IFERROR(SEARCH("@",A2)<SEARCH(".",A2,SEARCH("@",A2)),0),NOT(IFERROR(SEARCH("@",A2),0)=1),NOT(IFERROR(SEARCH(".",A2,SEARCH("@",A2))-SEARCH("@",A2),0)=1),LEFT(A2,1)<>".",RIGHT(A2,1)<>".")
Aqui está a mesma fórmula espaçada para que seja legível:
=AND(
ISERROR(FIND(" ",A2))
,LEN(A2)-LEN(SUBSTITUTE(A2,"@",""))=1
,IFERROR(SEARCH("@",A2)<SEARCH(".",A2,SEARCH("@",A2)),0)
,NOT(IFERROR(SEARCH("@",A2),0)=1)
,NOT(IFERROR(SEARCH(".",A2,SEARCH("@",A2))-SEARCH("@",A2),0)=1)
,LEFT(A2,1)<>"."
,RIGHT(A2,1)<>"."
)
Isso verifica que:
- Não há espaços
- Apenas um símbolo
@
- Existem alguns caracteres antes do símbolo
@
- Pelo menos um símbolo
.
após o símbolo@
- Pelo menos um caractere entre os símbolos
@
e seguintes.
- O endereço não começa nem termina com
.