Access - abrir nuevo correo desde access

abrir nuevo correo desde access

Publicado por la_maja (1 intervención) el 13/01/2005 12:50:44

TEngo una base de datos de ocntactos en access, queiro que al hacer doble click en el campo correo_electrónico se me habra el outlook con la direccion en el campo direccion.
Es como si hiciese un mailto desde una pagina web.
Creo que es algo que necesita mucha gente pero no he encontrado nada al respecto

Valora esta pregunta

Me gusta: Está pregunta es útil y esta clara

No me gusta: Está pregunta no esta clara o no es útil

Responder

Abrir Outlook con dirección de correo electrónico desde un campo

Publicado por Alejandro (4142 intervenciones) el 23/05/2023 00:39:19

Puedes utilizar código VBA (Visual Basic for Applications) en el evento Doble clic del campo de correo electrónico para abrir Outlook con la dirección de correo electrónico predefinida. Sigue estos pasos:

1. Abre tu base de datos en Access y ve al diseño del formulario.

2. Selecciona el campo de correo electrónico y ve a las propiedades del evento Doble clic.

3. Haz clic en el botón de los puntos suspensivos (...) para abrir el editor de código.

4. En el evento Doble clic del campo de correo electrónico, añade el siguiente código VBA:

Private Sub campoCorreoElectronico_DblClick(Cancel As Integer)

    Dim outlookApp As Object

    Dim outlookMail As Object

    Dim direccionCorreo As String

    ' Obtener la dirección de correo electrónico del campo

    direccionCorreo = Me.campoCorreoElectronico.Value

    ' Verificar si se ha ingresado una dirección de correo electrónico

    If direccionCorreo <> "" Then

        ' Crear una instancia de Outlook

        Set outlookApp = CreateObject("Outlook.Application")

        Set outlookMail = outlookApp.CreateItem(0)

        ' Configurar el correo electrónico

        With outlookMail

            .To = direccionCorreo

            .Display

        End With

        ' Liberar los objetos de Outlook

        Set outlookMail = Nothing

        Set outlookApp = Nothing

    End If

End Sub

Asegúrate de reemplazar `campoCorreoElectronico` con el nombre real del campo de correo electrónico en tu formulario.

5. Guarda el formulario y cierra el editor de código.

Ahora, cuando hagas doble clic en el campo de correo electrónico en el formulario, se abrirá Outlook con la dirección de correo electrónico predefinida en el campo.

Ten en cuenta que este código abrirá el cliente de correo electrónico predeterminado en tu sistema, que generalmente es Outlook. Si usas otro cliente de correo electrónico, es posible que debas realizar ajustes adicionales en el código.

Espero que esta solución te sea útil. ¡Buena suerte con tu base de datos de contactos!

Valora esta respuesta

Me gusta: Está respuesta es útil y esta clara

No me gusta: Está respuesta no esta clara o no es útil

Comentar