小编lin*_*ory的帖子

如何使用您在 Excel 中从右键单击菜单访问的命令“选择性粘贴 - 作为图片”？

我看过各种帖子，但在使用 Excel 2016 时似乎已经过时了。看来必须在本节中，

With TempWB.Sheets(1)
    .Cells(1).PasteSpecial Paste:=8
    .Cells(1).PasteSpecial xlPasteValues, , False, False
    .Cells(1).PasteSpecial xlPasteFormats, , False, False
    .Cells(1).Select

如何更改以允许复制和粘贴为图片？

使用下面的原始代码时，我丢失了电子邮件正文中的所有列和行大小。

Dim rng As Range
Dim OutApp As Object
Dim outMail As Object

Set rng = Nothing
' Only send the visible cells in the selection.

Set rng = Sheets("Dashboard").Range("B4:L17").SpecialCells(xlCellTypeVisible)

With Application
    .EnableEvents = False
    .ScreenUpdating = False
End With

Set OutApp = CreateObject("Outlook.Application")
Set outMail = OutApp.CreateItem(0)

With outMail
    .To = ""
    .CC = …