Buenos dias, hace tiempo el gran Antoni me ayudo con un codigo para enviar un email eligiendo la cuenta de envio.

Este codigo en un libro de excel que tengo funciona perfecto.

Ahora he querido trasladarlo a una base de datos hecha en access pero me da un error, le estoy dando mil vueltas pero no logro entender porque se para en la linea donde debe poner la cuenta de envio.

Adjunto una captura.

 

Hola

Prueba así:

.SendUsingAccount = Aplicacion.Application.Session.Accounts.Item("[email protected]")

Saludos

Abraham Valencia

Hola Abraham.

Gracias por responder.

El lunes que vuelvo al trabajo lo pruebo y te comento.

De nuevo muchas gracias.

En 3/1/2019 at 22:34 , avalencia dijo:

Hola

Prueba así:

.SendUsingAccount = Aplicacion.Application.Session.Accounts.Item("[email protected]")

Saludos

Abraham Valencia

Buenos dias, lo he probado.

Y sigue dandome el mismo error.

 

Gracias.

 

Hola.

Ya lo solucione.

Tenia que declarar la variable correo.

 

Dim Correo As Outlook.MailItem

 

Gracias.