Buenos días!

 

Amigos estoy buscando una solución que me permita enviar un correo en nombre de otra cuenta, en lo que he logrado leer es posible, la siguiente instrucción trabaja bien, pero al momento de intentar agregar .AddAttachment "C:\Users\jballadares\Desktop\Comprobante.pdf", me salta el siguiente error (imagen adjunta), podrían ayudarme como resolverlo de forma que me permita adjuntar un documento :

 

Sub SendEmailOnBehalf()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Dim olMailItm As Outlook.MailItem
Set olMailItm = Outlook.CreateItem(olMailItem)
With olMailItm
  .SentOnBehalfOfName = "Boletarecolectores@dospinos.com"     'indicamos la cuenta desde donde enviar el email (en nombre de...)
  .To = Hoja11.Range("B5").Value
  .Subject = "Notificación Automática Comprobante " & " " & Range("j4") '"Asunto""
  .Body = "Estimado usuario adjunto encontrará el detalle del registro de horas extras reportadas, este correo es generado en forma automática se le ruega no responder." & vbNewLine & "Saludos cordiales"
  .Display
  .Send

End With
Application.ScreenUpdating = True
Application.DisplayAlerts = True

End Sub

Hola Jose

  En 19/7/2019 at 13:52 , Jose BN dijo:

en lo que he logrado leer es posible, la siguiente instrucción trabaja bien, pero al momento de intentar agregar .AddAttachment

Vba esta siendo claro, con el error "El objeto olMailItm no admite esa propiedad o método [AddAttachment]", entonces cuando veas este tipo de errores, lee sobre cada propiedad o método que utilizas del objeto y verificar como se escribe correctamente

Pues lo correcto es: 

.Attachments.Add

 

Saludos 

  En 19/7/2019 at 14:50 , Gerson Pineda dijo:

Hola Jose

Vba esta siendo claro, con el error "El objeto olMailItm no admite esa propiedad o método [AddAttachment]", entonces cuando veas este tipo de errores, lee sobre cada propiedad o método que utilizas del objeto y verificar como se escribe correctamente

Por lo que lo correcto es: 

.Attachments.Add

 

Saludos 

Hola!

Gersón a vba solo le hace falta hablar!.... por el momento la forma correcta que mencionas, no la había logrado encontrar en mis lecturas hasta llegar a este genial sitio y toparme con un personal el doble de genial (tú)que me ayudo a resolver el problema,  ha quedado claro el error y solucionado.

Tema concluido.

 

Saludos cordiales

JB

  En 19/7/2019 at 15:18 , Jose BN dijo:

Gersón a vba solo le hace falta hablar!....

Pero si también habla  por si no lo sabias 

Otro consejo que te va servir, es que los errores de Vba, tienen su descripción, por ejemplo en este caso, se lee:

"Se ha producido el error 438 en tiempo de ejecución", esto significa precisamente que es invalido, entonces esa misma descripción puedes buscar por la red y podrás leer sobre el problema

 

Saludos