Sub EnviarMail() Dim strMail As String Dim ol As Outlook.Application Dim olMensaje As Outlook.MailItem Set ol = New Outlook.Application Set olMensaje = ol.CreateItem(olMailItem) On Error GoTo SalidaError strMail = InputBox("Introduzca la dirección de e-mail") If ...
Suscripción
acceso ilimitado a todos los libros de ENI sin compromiso de permanencia
libro impreso o digital online