Change order on generated e-mail

[sxhall]

Hi,

The below is part of a larger macro than generates an e-mail with an image from an Excel sheet as well as some text and the file as an attachment.

Set OutMail = OutApp.CreateItem(0)
    With OutMail
        Set olInsp = .GetInspector
        Set wdDoc = olInsp.WordEditor
        Set oRng = wdDoc.Range
        .BodyFormat = 2
        .To = sTo
        .CC = sTo2
        .BCC = ""
        .Subject = "Scan Report - " & Format(Now(), "dd/mm/yy")
        .Body = "All," & vbCr & vbCr & "Please find attached to this email the 'Scan Report' for the " _
        & Format(Now(), "dd/mm/yy") & "." & vbCr & vbCr & "Regards" & vbCr & vbCr & Myname
        oRng.collapse 1
        oRng.Paste
        .Attachments.Add ActiveWorkbook.FullName
        .Display
    End With

What I need to do is have the image after the text! I have tried reordering hte above but it then does not add the .Body part of the code or the image.

Any help with how to have the e-mail format as the .Body part first and then the oRng.Paste after would be appreciated.

Thanks in advance

Steven