Как удалить себя из полей Кому/Копия/Скрытая копия при ответе всем в Outlook?
Если в вашем Outlook есть несколько учетных записей электронной почты, это может вызвать некоторые проблемы при ответе на полученное письмо. Например, вы получаете письмо через одну учетную запись, но все адреса ваших учетных записей электронной почты отображаются как получатели в этом письме. После нажатия кнопки «Ответить всем» все адреса учетных записей электронной почты включаются в поля Кому, Копия или Скрытая копия. Но на самом деле вы не хотите, чтобы другие ваши учетные записи получали это письмо. Как же удалить себя из ответа всем? В этой статье мы предложим вам методы для решения этой задачи.
Удаление себя при отправке писем с помощью кода VBA
Одним щелчком удалить себя из ответа всем с помощью Kutools для Outlook
Удаление себя при отправке писем с помощью кода VBA
Вы можете добавить адреса своих учетных записей электронной почты в Outlook в следующий код VBA, чтобы предотвратить отправку писем самому себе. Пожалуйста, действуйте следующим образом.
1. Одновременно нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.
2. В окне Microsoft Visual Basic for Applications дважды щелкните Project1 > Объекты Microsoft Outlook > ThisOutlookSession, затем скопируйте и вставьте следующий код VBA в окно Код. Смотрите скриншот:

Код VBA: удаление себя из всех отправляемых писем в Outlook
Private Sub RemoveRecipientsWhenItemSend(Item As Outlook.MailItem)
Dim RemoveAddrList As VBA.Collection
Dim Recipients As Outlook.Recipients
Dim aRecipient As Outlook.Recipient
Dim i
Dim j
Set RemoveAddrList = New VBA.Collection
' add addresses here
RemoveAddrList.Add "happy.xuebi@163.com"
RemoveAddrList.Add "siluvia@extendoffice.com"
Set Recipients = Item.Recipients
For i = Recipients.Count To 1 Step - 1
Set aRecipient = Recipients.Item(i)
For j = 1 To RemoveAddrList.Count
If LCase$(aRecipient.Address) = LCase$(RemoveAddrList(j)) Then
Recipients.Remove i
Exit For
End If
Next
Next
End Sub
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
On Error Resume Next
RemoveRecipientsWhenItemSend Item
End Sub
1. Пожалуйста, измените адреса электронной почты в коде VBA на свои учетные записи электронной почты.
2. Убедитесь, что опция «Включить все макросы» активирована. Смотрите скриншот:

3. Нажмите кнопку Сохранить и закройте окно Microsoft Visual Basic for Applications.
Теперь, когда вы отправляете письма, указанные адреса электронной почты ваших учетных записей Outlook будут автоматически удалены из полей Кому, Копия или Скрытая копия.
Одним щелчком удалить себя из ответа всем с помощью Kutools для Outlook
Если у вас есть Kutools для Outlook, вы можете удалить свои адреса из полей Кому, Копия и Скрытая копия при отправке писем одним щелчком.
Как показано на следующем скриншоте, чтобы удалить себя из ответа всем в Outlook, пожалуйста, действуйте следующим образом.

1. После нажатия кнопки «Ответить всем» для создания ответного письма нажмите Kutools > Мои имена. Смотрите скриншот:

Затем все ваши имена (адреса учетных записей электронной почты) немедленно удаляются из полей Кому, Копия или Скрытая копия.

Если вы хотите бесплатно попробовать эту утилиту, пожалуйста, перейдите по ссылке для бесплатной загрузки программного обеспечения, а затем выполните операцию согласно вышеуказанным шагам.
Лучшие инструменты для повышения продуктивности в Office
Срочные новости: Выпущена бесплатная версия Kutools для Outlook!
Оцените совершенно новый Kutools для Outlook с более чем100 потрясающими функциями! Нажмите, чтобы скачать сейчас!
📧 Автоматизация Email: Автоответчик (доступно для POP и IMAP) / Запланировать отправку Email / Авто Копия/Скрытая копия по правилу при отправке письма / Автоматическое перенаправление (Расширенное правило) / Автоматически добавить приветствие / Автоматическое разделение Email с несколькими получателями на отдельные сообщения ...
📨 Управление Email: Отозвать письмо / Блокировать мошеннические Email по теме и другим признакам / Удалить дубликаты писем / Расширенный Поиск / Организовать папки ...
📁 Вложения Pro: Пакетное сохранение / Пакетное открепление / Пакетное сжатие / Автосохранение / Автоматическое отсоединение / Автоматическое сжатие ...
🌟 Магия интерфейса: 😊Больше красивых и современных Эмодзи / Напоминания о важных письмах / Сворачивание Outlook вместо закрытия ...
👍 Мгновенные действия в один клик: Ответить всем с вложениями / Антифишинг Email / 🕘Показать часовой пояс отправителя ...
👩🏼🤝👩🏻 Контакты и Календарь: Пакетное добавление контактов из выбранных Email / Разделить группу контактов на отдельные группы / Удалить напоминание о дне рождения ...
Используйте Kutools на вашем любимом языке – поддерживается английский, испанский, немецкий, французский, китайский и более40 других языков!

