如何通过vba将excel表格以图片形式粘贴到邮件正文中?

我有一个范围内的excel表格(“A1:H13”)。我应该如何编写代码来将此表作为图片粘贴到邮件正文中。我的代码如下所示:

Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
On Error Resume Next
With OutMail
    .Subject = Range("K1").Value
    .To = Range("K2").Value
    .Cc = Range("K3").Value
    .Bcc = Range("K4").Value
    .Body = Range("A1:H13").Value
    .Send
End With
On Error GoTo 0
Set OutMail = Nothing

转载请注明出处:http://www.lsql.net/article/20230510/2568906.html