Macro to send email

[LB79]

Hi - im looking to have a macro that reads a cell value then sends the value to me in email. Ive tried recording the process but it doesnt pick anyting up. Can anyone help?

[LB79]

Ive since come up with the below code but i only want to send 1 worksheet not teh whole workbook. Does anyone know how i can change this?
-----------------
Sub Mail()
ActiveWorkbook.SendMail "[email protected]", _
"My Subject"
End Sub
-----------------

Thanks