☰

Автоматически сохранять вложения из писем, соответствующих определенному правилу

tag-icon • tag-icon email microsoft-outlook email-filter
Автоматически сохранять вложения из писем, соответствующих определенному правилу

Каждое утро я получаю электронное письмо от человека, и оно содержит вложение в виде электронной таблицы. Мне удалось создать правило Outlook, которое перехватывает эти электронные письма. Теперь, возможно ли автоматически сохранить вложение из каждого из них в локальной папке с именем файла YYYY-MM-DD.xls?

Вложение в письме имеет случайно сгенерированное имя файла, поэтому для выбора имени файла необходимо использовать дату отправки письма. Примечание: это мой ноутбук, поэтому есть вероятность, что электронное письмо будет отправлено не в тот день, когда я его получил (например, когда он был выключен на день), поэтому использование «сегодняшней даты» не является приемлемым вариантом.

РЕДАКТИРОВАТЬ: использование Windows 7 с Outlook 2013

решение1

Чтобы сделать то, что вы хотите, вам нужно будет смешать немного VBA и Rules. Не уверен, какую версию Outlook вы используете, поэтому никаких гарантий. Это было проверено на Outlook 2010.

Эта статья поможет вам все настроить -Правило автоматического сохранения вложения в Outlook.

Приведенный ниже код изменен специально для сохранения файла с именем в формате yyyy-mm-dd.

Public Sub SaveToDisk(itm As Outlook.MailItem)
Dim objAtt As Outlook.Attachment
Dim saveFolder As String
Dim dateFormat

dateFormat = Format(Now, "yyyy-mm-dd")

'Change this path to the your folder location
saveFolder = "c:\temp\"

objAtt.SaveAsFile saveFolder & "\" & dateFormat & ".xls"

Set objAtt = Nothing

End Sub

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

Связанный контент