none
Enviar mail desde código RRS feed

  • Pregunta

  • Hola a todos.

    En un libro de trabajo de Excel, he insertado un botón para poder enviar un mensaje de correo electrónico con el gestor de correo predeterminado. Mi código es el siguiente:

    Sub EnviarCorreo()
        Dim file As String
       
        file = "C:\Windows\win.ini"
        Shell "cmd.exe /c start mailto:correo@gmail.com?Subject=Test&Body=Test correo&attachment=""" & file & """"
    End Sub

    Pero me funciona a medias: me muestra la ventana de nuevo mensaje con la dirección de correo del destinatario y el asunto, pero no me muestra el cuerpo del mensaje especificado (Test correo) ni me adjunta el fichero. ¿Alguien sabe que tengo mal?.

    Mi versión de Office es la 2013.

    Gracias.


    • Editado raulsang miércoles, 28 de octubre de 2015 17:35
    miércoles, 28 de octubre de 2015 16:58