Extraer email de cadena de texto en excel
Si tienes el casoque te pasan una base de datos sin formato, y debes extraer los correos electronicos, para una campaña de marketing o para enviar un envio masivo importante puedes usar Extraiga La Dirección De Correo Electrónico De La Cadena De Texto Con La Función Definida Por El Usuario Excepto la fórmula anterior, una función definida por el usuario también puede ayudarlo a obtener la dirección de correo electrónico de la cadena de texto. 1 . Mantenga pulsado el ALT + F11 llaves, y abre el Microsoft Visual Basic para aplicaciones ventana. 2 . Hacer clic recuadro > Módulo y pegue la siguiente macro en la ventana Módulo. Function ExtractEmailFun(extractStr As String) As String 'Update by extendoffice Dim CharList As String On Error Resume Next CheckStr = "[A-Za-z0-9._-]" OutStr = "" Index = 1 Do While True Index1 = VBA.InStr(Index, extractStr, "@") getStr = "" If Index1 > 0 Then For p = Index1 - 1 To 1 Step...