Как распечатать электронное письмо без получателей в Outlook?

Author: Kelly Last Modified: 2025-08-07

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

Распечатайте электронное письмо без его получателей с помощью VBA

Распечатайте электронное письмо без его получателей с помощью VBA

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

1. Выделите письмо, которое хотите напечатать без получателей. Затем нажмите Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. Нажмите "Вставить" > "Модуль", затем вставьте следующий код VBA в окно модуля.

VBA: Распечатать электронное письмо без получателей

Public Sub PrintWithoutRecipient()
Dim oItem As Outlook.MailItem
Dim i As Long

For i = 1 To Application.ActiveExplorer.Selection.Count
Set oItem = Application.ActiveExplorer.Selection.Item(i)
oItem.To = ""
oItem.CC = ""
oItem.PrintOut
oItem.Close olDiscard
Set oItem = Nothing
Next
End Sub

3. Нажмите клавишу "F5" или кнопку "Выполнить", чтобы запустить VBA.

Теперь выбранное электронное письмо будет напечатано без отображения его получателей.

Примечание: Этот VBA использует принтер по умолчанию и настройки печати, настроенные в Outlook. Настройте параметры перед запуском скрипта.

🖨️ Простая печать отправленных писем с получателями Bcc

В Outlook поле "Bcc" обычно исключается при печати отправленных писем. С помощью функции "Расширенная печать" Kutools для Outlook вы можете распечатывать отправленные письма с получателями Bcc, настраивать заголовки и даже добавлять фон для профессионального оформления.