Hello,

I have been really struggling with this. Advice would be much appreciated. I have been looking a lot at Ron de Bruin's website but I am still unclear.

Here is my code:-

Sub EmailTest()

Dim OutApp As Object
Dim OutMail As Object
Dim cell As Range




Application.ScreenUpdating = False
Set OutApp = CreateObject("Outlook.Application")

    Set OutMail = OutApp.CreateItem(0)
    On Error Resume Next
    With OutMail
        .To = Range("email")
        .Subject = "Report"
        .Body = "Dear Sir" & Worksheets("Sheet1").Range("Holding")
        .Display
    End With
    On Error GoTo 0

    Set OutMail = Nothing


End Sub
The problems I have are:-

1.) I want the body of the email to be a defined range from excel. But I cannot get it to work. In the case above the defined range in excel is called Holding

2.) How do I get my email signature to be added to the message? I seemed to have accidentally done this in previous trials of mine, but I am very unclear.

Many thanks