小编Sam*_*ppa的帖子

我必须将报告发送到 400 多个电子邮件地址（B 列）。每个报告的文件路径位于 C、D 和 E 列。

通过这篇文章：如何在 Outlook 中添加默认签名，.display使用该方法时会添加签名。

我要显示的签名是用户号 1 的签名。我已选择相应的签名作为新消息的默认签名。

该签名包含图片，但这似乎不会造成任何问题。

我不希望宏每次发送邮件时都显示邮件，因为我想避免屏幕上不断闪烁。

我试图从这里寻找类似“隐藏”方法的东西，但没有找到任何有用的东西（.display会在后台运行，并且会对用户隐藏）。另一个想法是添加application.screenupdating = false并相应地true，但这没有任何影响。

如何在后台显示电子邮件而不是每次都向用户显示？

Sub sendFiles_weeklyReports()\n\n    Dim OutApp As Object\n    Dim OutMail As Object\n\n    Dim sh As Worksheet\n    Dim EmailCell As Range\n    Dim FileCell As Range\n    Dim rng As Range\n\n    Dim lastRow As Long\n    Dim timestampColumn As Long\n    Dim fileLogColumn As Long\n    Dim i As Long\n\n    Dim …