Hello
I would like to automatically send a spreadsheet out via e-
mail, but i do not know how to send it, or even a
selection of the sheet (ie a range of cells). The code i
am using at the moment is as follows. What do i need to
put into the body statement to send either the whole sheet
or some of the cells?

Thanks in advance

Richard

Dim myOutlook As Object
Dim myMailItem As Object
' Make instance
Set myOutlook = CreateObject("Outlook.Application")
' Make mail item
Set myMailItem = myOutlook.CreateItem(0)
' Set recipient (internal mail)
' Set recipient (external mail)
myMailItem.Recipients.Add "
' Set subject
myMailItem.Subject = "Subcontractor Sheet"
' Set body
myMailItem.Body = Range("A1:Z100")
' And send it!
myMailItem.Send
' Close instance
Set myOutlook = Nothing