email enviado excel hola amigos como puedo poner en este mail el texto que va en el cuerpo del mensaje el body????
Set objOutlook = CreateObject("Outlook.Application")
Set objNameSpace = objOutlook.GetNameSpace("MAPI")
Set objMailItem = objOutlook.CreateItem(0)
Dim objRecipient As Object
Dim Fichero As String
Dim Destino As String
Fichero = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
ActiveWorkbook.SendMail Array("[email protected]", "[email protected]"), "asunto", False
