Перейти к содержимому

Как удалить себя из полей Кому/Копия/Скрытая копия при ответе всем в Outlook?

Author: Siluvia Last Modified: 2025-08-07

Если в вашем 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 в окно Код. Смотрите скриншот:

delete myself address from to filed when reply all using vba 1

Код 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
Nowts:

1. Пожалуйста, измените адреса электронной почты в коде VBA на свои учетные записи электронной почты.

2. Убедитесь, что опция «Включить все макросы» активирована. Смотрите скриншот:

delete myself address from to filed when reply all using vba 2

3. Нажмите кнопку Сохранить и закройте окно Microsoft Visual Basic for Applications.

Теперь, когда вы отправляете письма, указанные адреса электронной почты ваших учетных записей Outlook будут автоматически удалены из полей Кому, Копия или Скрытая копия.


Одним щелчком удалить себя из ответа всем с помощью Kutools для Outlook

Если у вас есть Kutools для Outlook, вы можете удалить свои адреса из полей Кому, Копия и Скрытая копия при отправке писем одним щелчком.

 👉 У Kutools for Outlook теперь есть бесплатная версия, в которой 70+ функций доступны бесплатно на всю жизнь. Скачать бесплатную версию прямо сейчас.

Как показано на следующем скриншоте, чтобы удалить себя из ответа всем в Outlook, пожалуйста, действуйте следующим образом.

delete myself address from to filed when reply all using kutools for outlook 1

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

delete myself address from to filed when reply all using kutools for outlook 2

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

delete myself address from to filed when reply all using kutools for outlook 3

Если вы хотите бесплатно попробовать эту утилиту, пожалуйста, перейдите по ссылке для бесплатной загрузки программного обеспечения, а затем выполните операцию согласно вышеуказанным шагам.


Лучшие инструменты для повышения продуктивности в Office

Срочные новости: Выпущена бесплатная версия Kutools для Outlook!

Оцените совершенно новый Kutools для Outlook с более чем100 потрясающими функциями! Нажмите, чтобы скачать сейчас!

🤖 Kutools AI : Использует передовые технологии искусственного интеллекта для легкой работы с Email – отвечает, резюмирует, оптимизирует, расширяет, переводит и создает Email.

📧 Автоматизация Email: Автоответчик (доступно для POP и IMAP) / Запланировать отправку Email / Авто Копия/Скрытая копия по правилу при отправке письма / Автоматическое перенаправление (Расширенное правило) / Автоматически добавить приветствие / Автоматическое разделение Email с несколькими получателями на отдельные сообщения ...

📨 Управление Email: Отозвать письмо / Блокировать мошеннические Email по теме и другим признакам / Удалить дубликаты писем / Расширенный Поиск / Организовать папки ...

📁 Вложения Pro: Пакетное сохранение / Пакетное открепление / Пакетное сжатие / Автосохранение / Автоматическое отсоединение / Автоматическое сжатие ...

🌟 Магия интерфейса: 😊Больше красивых и современных Эмодзи / Напоминания о важных письмах / Сворачивание Outlook вместо закрытия ...

👍 Мгновенные действия в один клик: Ответить всем с вложениями / Антифишинг Email / 🕘Показать часовой пояс отправителя ...

👩🏼‍🤝‍👩🏻 Контакты и Календарь: Пакетное добавление контактов из выбранных Email / Разделить группу контактов на отдельные группы / Удалить напоминание о дне рождения ...

Используйте Kutools на вашем любимом языке – поддерживается английский, испанский, немецкий, французский, китайский и более40 других языков!

Мгновенно разблокируйте Kutools для Outlook одним кликом. Не ждите, скачайте сейчас и повысьте свою эффективность!

kutools for outlook features1 kutools for outlook features2