Hi,

I'm creating a macro in Excel 2010 that will automatically copy a cell range and auto paste it in Outlook 2010. I wanted to paste it as Picture (Enhanced Metafile)

Here is the code that I've been using but not sure how to insert the auto paste part.

Public Sub SendToMail()

    Dim myOutlook As Object
    Dim objMailMessage As Object
    Dim signature As String
    Dim outBody As String
    Dim Cell As Range
    
    Set myOutlook = CreateObject("Outlook.Application")
    Set objMailMessage = myOutlook.CreateItem(0)
        With objMailMessage
            .To = " "
            .Subject = Range("S6")
            .ReadReceiptRequested = True
            .OriginatorDeliveryReportRequested = True
            .Body = ("Press CTRL + A, then CTRL + V")
            .Display
        End With

End Sub