添加签名时Outlook屏幕闪烁

Question

我通过Outlook电子邮件向所有员工发送默认签名的批量电子邮件。我面临的唯一问题是屏幕闪烁。我使用Application.ScreenUpdating = False，但它不起作用。请告诉我们可以做些什么。

With OutMail 
    .BodyFormat = olFormatHTML 
    .Display 
End With 
Signature = OutMail.HTMLBody 

On Error Resume Next 
With OutMail 
    .To = ws.Cells(I, 4).Value 
    .Subject = ws.Cells(I, 1).Value & "-" & ws.Cells(I, 3).Value 
    .HTMLBody = StrBody & vbNewLine & RangetoHTML(rng) & vbNewLine & Signature 
    .Send 
End With 

Answer 1

您不需要拨打显示屏 - 即使您只拨打MailItem.GetInspector，也会添加签名。其次，你连接2个HTML字符串 - 你不能这样做，他们必须合并。