Hola a todos!!!
Vi esta macro y quisiera adaptarla a mis necesidades.
Necesito enviar un rango de celdas en el cuerpo de outlook en vez de un texto.
¿Alguien me puede ayudar a hacerlo?
Muchas gracias
Dim ol As Outlook.Application
Dim NewTask As Outlook.MailItem
Dim myattachments As Attachments
Set ol = New Outlook.Application
Set NewTask = ol.CreateItem(olMailItem)
Set myattachments = NewTask.Attachments
NewTask.BCC = "direccionmail"
NewTask.Subject = "Hola"
NewTask.Body = "Gracias por tu ayuda"
NewTask.Send
