Enviar mail a través de macros
Dante, junto con saludar y agradecer tus conocimientos, te comento que probé una de tus macros de enviar mail a través de excel, pero no me resulta. Yo trabajo con Office 2016 y que por lo que comentas solo se puede para 2007. ¿Es cierto esto?
¿Tu me podrías ayudar para 2016?
Esta fue la macro que probé, ya que necesito adjuntar imagen en el cuerpo del mail.
Private Sub CommandButton1_Click() Range("J251:K352").Select With Selection.Font .ColorIndex = xlAutomatic .TintAndShade = 0 End With Range("a5:l355").Copy Set dam = CreateObject("outlook.application").createitem(0) dam.To = "Ingresar correo de CLARO" dam.Subject = "Propuesta " & Range("B7") & "-" & Range("B8") dam.display 'Application.SendKeys "^v" Application.Wait Now + TimeValue("00:00:01") SendKeys "^{home}", True DoEvents SendKeys "%nvo", True DoEvents SendKeys "{UP}", True DoEvents SendKeys "{UP}", True DoEvents SendKeys "{ENTER}", True Set dam = Nothing End Sub
Respuesta de Dante Amor
1