Macro en excel que seleccione celdas y las envíe por correo
Esperando estén bien, les pido favor su ayuda en escribir una macro que seleccione un rango de celdas con valores, los copie en un correo y los envié a destinatarios. Hasta ahora tengo esto escrito (y si, no se nada de macros)
Sub correo1()
Range("c11:g49").Copy
Set parte1 = CreateObject("outlook.application")
Set parte2 = parte1.CreateItem(olMailItem)
parte2.To = “[email protected]”
parte2.CC = "[email protected]"
parte2.Subject = "información solicitada"
Parte2. Body = "Estimadas(os) buenos días, junto con saludar, les adjunto detalle solicitado"
parte2.Display
Application.SendKeys "^v"
Set parte1 = Nothing
Set parte2 = Nothing
End Sub
Con esto tengo 2 problemas
1, se selecciona todo el rango de celdas (c11 a g49) y lo que necesito es que se seleccione dentro de ese rango las celdas que tienen valores.
2. Al cargar tabla a Outlook, aparece primero la tabla y abajo el cuerpo del mensaje, necesito que aparezca primero el cuerpo del mensaje y luego la tabla.