Actividad pública reciente
Ha valorado "Excelente" la respuesta
Ayuda por favor...
Prueba esto: Sub Enviar() ' ' Enviar Macro ' Dim asunto As String asunto = "Ventas diarias al " & Range("c5") Application.Dialogs(xlDialogSendMail).Show "direccion de correo", asunto End Sub