Enviar un mail desde Excel

[MauroLeproso]

Hola, es el primer mensaje que escribo al foro.
Y mi problema es el siguiente:
estoy haciendo una macro en excel que despues de unos pasos, crea un mail y adjunta el workbook. Lo que yo quiero hacer es poner una dirección de email en el campo "from" del mail y no puedo hacerlo, puedo usar el campo CC y BCc pero no el campo "from", alguien me da una mano con esto por favor???
muchas gracias desde ya.

[jorge_anibal]

Esto te puede servir
Sub Mail_ActiveSheet()
Dim strDate As String
ActiveSheet.Copy
strDate = Format(Date, "dd-mm-yy") & " " & Format(Time, "h-mm-ss")
ActiveWorkbook.SaveAs "Part of " & ThisWorkbook.Name _
& " " & strDate & ".xls"
ActiveWorkbook.SendMail "[email protected]", _
"This is the Subject line"
ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill ActiveWorkbook.FullName
ActiveWorkbook.Close False
End Sub