Если вы хотите быстро получить количество вложений в каждом электронном письме в списке адресов электронной почты, вы можете использовать код VBA в этой статье. Он будет автоматически подсчитывать вложения в каждом входящем электронном письме и отображать количество в новом столбце.
Некоторым пользователям часто требуется подсчитывать вложения электронной почты. В этом случае, почему бы не создать и не включить эксклюзивный столбец для отображения количества вложений? Далее мы научим вас, как заставить Outlook автоматически подсчитывать вложения электронной почты и отображать количество в таком новом столбце.
Отображение счетчика вложений в списке адресов электронной почты
- Для насtart, запустите приложение Outlook.
- Затем нажмите клавиши «Alt + F11» в главном окне Outlook.
- Далее в новом окне редактора Outlook VBA вам нужно открыть модуль, который не используется.
- Затем скопируйте и вставьте следующий код VBA в этот модуль.
Sub AutoCountAttachments(objMail As Outlook.MailItem)
Dim objAttachments As Outlook.Attachments
Dim objProperties As Outlook.UserProperties
Dim objProperty As Outlook.UserProperty
Dim strPropertyName As String
Set objAttachments = objMail.Attachments
strPropertyName = "Attachment Count"
Set objProperties = objMail.UserProperties
'Check if there is already a column in this name
Set objProperty = objProperties.Find(strPropertyName, True)
If objProperty Is Nothing Then
'If not, add this column
Set objProperty = objProperties.Add(strPropertyName, olText, True)
End If
'Set the column value equal to the count of attachments
objProperty.value = objAttachments.Count
objMail.Save
End Sub
- После этого вы можете выйти из текущего окна «Microsoft Visual Basic для приложений».
- Позже вам нужно создать новое правило для запуска этого скрипта для каждого входящего письма.
- Во-первых, перейдите в меню «Файл» и нажмите кнопку «Управление правилами и предупреждениями» на вкладке «Информация».
- Затем в новом диалоговом окне нажмите кнопку «Новое правило».
- На следующем экране «Мастер правил» выберите «Применить правило к сообщениям, которые я получаю» и нажмите «Далее».
- Далее игнорируем «Выбрать условия» и нажимаем «Далее».
- Затем выберите действие «запустить скрипт» и выберите ранее добавленный макрос, как показано на следующем снимке экрана.
- После этого нажмите несколько раз «Далее», пока не дойдете до последнего экрана «Завершить настройку правила».
- Позже вам нужно указать новое имя для этого правила, а также включить опцию «Выполнять это правило для сообщений, которые уже находятся в папке «Входящие»» и «Включить это правило».
- Наконец, нажмите на кнопку «Готово».
- После этого вы должны добавить столбец «Счетчик вложений», созданный кодом VBA. Просто выполните следующие действия:
- Сначала перейдите на вкладку «Просмотр» на экране списка адресов электронной почты.
- Затем нажмите на кнопку «Просмотреть настройки».
- В новом всплывающем диалоговом окне нажмите кнопку «Столбцы».
- Затем в окне «Показать столбцы» найдите и выберите столбец «Число вложений» в разделе «Пользовательские столбцы в папке «Входящие»» и нажмите кнопку «Добавить».
- Наконец, нажмите кнопку «ОК», чтобы сохранить изменения.
- В конце концов, вы можете увидеть столбец «Число вложений» в списке адресов электронной почты, в котором отображается количество вложений для каждого электронного письма, как показано на рисунке ниже:
Избегайте потери данных PST
Считается, что никто не хочет мириться с потерей данных PST. То же самое должно относиться и к вам. Поэтому вы должны принять некоторые меры предосторожности, такие как создание резервных копий данных вашего файла PST и получение надежного инструмента исправления, такого как DataNumen Outlook Repair. Он может восстановить Outlook вопросы, не нарушая пота.
Об авторе:
Ширли Чжан — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая исправление sql и программные продукты для ремонта Outlook. Для получения дополнительной информации посетите www.datanumen.com