Як автоматично пересилати вкладення лише на основі певних критеріїв в Outlook?
Зазвичай під час пересилання електронного листа також включається оригінальне тіло повідомлення та вкладення. Але, іноді, вам просто потрібно переслати лише вкладення без оригінального повідомлення на основі критеріїв конкретній особі. Як ви могли вирішити цю роботу в Outlook?
Автоматично пересилати лише вкладені файли на основі конкретних критеріїв за допомогою коду VBA
Автоматично пересилати лише вкладені файли на основі конкретних критеріїв за допомогою коду VBA
Наприклад, при отриманні електронного листа, тема якого містить текст «функція kto», усі вкладення цього електронного листа автоматично пересилатимуться конкретній особі без тіла повідомлення. Наступні кроки можуть вам допомогти, будь ласка, виконайте наступні дії:
1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.
2, в Microsoft Visual Basic для додатків вікно, двічі клацніть ThisOutlookSession від Проект1 (VbaProject.OTM) , щоб відкрити режим, а потім скопіюйте та вставте наступний код у порожній модуль.
Код VBA: Автоматична переадресація електронної пошти без тіла повідомлення, але просто додайте вкладення:
Public WithEvents ReceivedItems As Outlook.Items
Private Sub Application_Startup()
Set ReceivedItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub ReceivedItems_ItemAdd(ByVal Item As Object)
Dim xForwardMail As Outlook.MailItem
Dim xEmail As MailItem
On Error Resume Next
If Item.Class <> olMail Then Exit Sub
Set xEmail = Item
If InStrRev(UCase(xEmail.Subject), UCase("kto feature")) = 0 Then Exit Sub 'change subject text to your need
If xEmail.Attachments.Count = 0 Then Exit Sub
Set xForwardMail = xEmail.Forward
With xForwardMail
.HTMLBody = ""
With .Recipients
.Add "" 'change address to your own
.ResolveAll
End With
.Send
End With
End Sub
примітки: У наведеному вище коді вам слід змінити текст теми та адресу одержувача на власну.
3. Потім збережіть код і перезапустіть Outlook, щоб надати ефект коду.
4. Відтепер кожного разу, коли нове повідомлення електронної пошти містить текст конкретної теми, що надходить у вашу поштову скриньку, Outlook автоматично перенаправляє свої вкладення без тіла повідомлення бажаній особі.
примітки: Цей код доступний лише для облікового запису за замовчуванням.
Найкращі інструменти продуктивності офісу
Kutools для Outlook - Понад 100 потужних функцій, які покращать ваш Outlook
???? Автоматизація електронної пошти: Поза офісом (доступно для POP та IMAP) / Розклад надсилання електронних листів / Автоматична копія/прихована копія за правилами під час надсилання електронної пошти / Автоматичне пересилання (розширені правила) / Автоматично додавати привітання / Автоматично розділяйте електронні листи кількох одержувачів на окремі повідомлення ...
📨 Управління електронною поштою: Легко відкликайте електронні листи / Блокуйте шахрайські електронні листи за темами та іншими / Видалити повторювані електронні листи / розширений пошук / Консолідація папок ...
📁 Вкладення Pro: Пакетне збереження / Пакетне від'єднання / Пакетний компрес / Автозавантаження / Автоматичне від'єднання / Автокомпресія ...
???? Магія інтерфейсу: 😊Більше красивих і класних смайликів / Підвищте продуктивність Outlook за допомогою вкладок / Згорніть Outlook замість того, щоб закривати ...
👍 Дива в один клік: Відповісти всім із вхідними вкладеннями / Антифішингові електронні листи / 🕘Показувати часовий пояс відправника ...
👩🏼🤝👩🏻 Контакти та календар: Пакетне додавання контактів із вибраних електронних листів / Розділіть групу контактів на окремі групи / Видаліть нагадування про день народження ...
більше Особливості 100 Чекайте на ваше дослідження! Натисніть тут, щоб дізнатися більше.