Validando um e-mail pelo VBA
Muitas vezes precisamos inserir e-mails em nossas planilhas, mas o que fazer se você deseja que estes e-mails sejam validados, a fim de evitar erros de digitação? Aqui está o código em VBA que realiza isso: Sub email() Dim txtEmail As String 'Obtém o endereço de e-mail txtEmail = InputBox("Digite o endereço", "Endereço de e-mail") Dim Situacao As String 'Identifica a situação dele If IsEmailValid(txtEmail) Then Situacao = "Sintaxe válida de e-mail!" Else Situacao…(read more)
