Перейти до основного матеріалу

Outlook: автоматичне нагадування при забутті вкладень у повідомленнях

Можливо, вас болить голова, якщо ви забудете додавати вкладення, але нагадайте одержувачам перевірити вкладення в тілі повідомлення електронної пошти. Тут ми представимо два прийоми про те, як автоматично нагадувати собі, коли ви надсилаєте повідомлення електронної пошти, в якому можуть бути відсутні вкладення в Microsoft Outlook.

Автоматично нагадувати про забуття вкладень у програмі Outlook 2013/2016

Автоматично нагадувати про забуття вкладень у програмах Outlook 2007 та 2010

видалити всі дублікати контактів з однієї або декількох папок контактів в Outlook

Іноді ми можемо повторно додавати одні й ті самі контакти, як можна видалити повторювані контакти з однієї або декількох папок контактів? Kutools для Outlook's Duplicate Contacts Функція може швидко видалити або об'єднати повторювані контакти на основі електронних листів, повного імені чи інших критеріїв з однієї або декількох папок контактів.    Натисніть на 45-денну безкоштовну пробну версію!
doc видалити повторювані контакти 1
 
Kutools для Outlook: з десятками зручних надбудов Outlook, які можна безкоштовно спробувати без обмежень протягом 45 днів.
Вкладка Office - увімкніть редагування та перегляд із вкладками в Microsoft Office, що полегшить роботу
Kutools для Outlook - покращте Outlook за допомогою 100+ розширених функцій для надзвичайної ефективності
Покращіть свій Outlook 2021 - 2010 або Outlook 365 за допомогою цих розширених функцій. Насолоджуйтесь повною 60-денною безкоштовною пробною версією та покращте роботу електронної пошти!

стрілка синя права міхурАвтоматичне нагадування при забутті вкладень у програмі Outlook 2013/2016

Microsoft Outlook 2013 підтримує функцію автоматичного попередження про надсилання повідомлення електронної пошти, у якому можуть бути відсутні вкладення.

Крок 1: натисніть кнопку філе > Опції.

Крок 2: У діалоговому вікні Параметри Outlook натисніть на пошта в лівій панелі.

Крок 3: перейдіть на сторінку Відправлення повідомлень і продовжуйте перевіряти варіант Попереди мене, коли я надсилаю повідомлення, в якому може бути відсутність вкладення.

Крок 4: натисніть кнопку OK , щоб вийти з цього діалогового вікна.

Тоді Microsoft Outlook 2013 або 2016 автоматично попередить вас, якщо ви забудете вкладення.

Наприклад, ви вводите текст “будь ласка, перевірте вкладення»,«переглянути вкладення”Тощо у вашому тексті повідомлення, але не вставляйте вкладення в Прихильність поле. При натисканні на Відправити , з'явиться діалогове вікно із попередженням про те, що ви, можливо, забули вкласти файл. Дивіться наступний знімок екрана:


стрілка синя права міхурАвтоматичне нагадування при забутті вкладень в Outlook 2007 та 2010

Microsoft Outlook 2007 і 2010 не підтримують автоматичне попередження, якщо ви можете забути вкладення. Макрос VBA може допомогти вам це усвідомити.

Крок 1: Натисніть кнопку інший + F11 клавіші, щоб відкрити вікно Microsoft Visual for Applications.

Крок 2: Проведіть проект 1 на лівій панелі та двічі клацніть на ThisOutlookSession щоб його відкрити.

Крок 3: Вставте наступний код у вікно ThisOutlookSession.

VBA: Попередження, якщо не вставити вкладення

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim retMB As Variant
Dim strBody As String
Dim iIndex As Long

On Error GoTo handleError

iIndex = InStr(Item.Body, "attach")

If iIndex > 0 And Item.Attachments.Count = 0 Then

retMB = MsgBox("You may have forgotten to attach a file." & vbCrLf & vbCrLf & "Do you still want to continue?", vbQuestion + vbYesNo + vbMsgBoxSetForeground)
If retMB = vbNo Then Cancel = True

End If

handleError:

If Err.Number <> 0 Then
MsgBox "Outlook Attachment Alert Error: " & Err.Description, vbExclamation, "Outlook Attachment Alertr Error"
End If

End Sub

Крок 4: натисніть кнопку зберегти кнопка на панелі інструментів.

Відтепер, якщо ви додасте текст “прихильність”У тілі повідомлення, але не вкладайте файли, з’явиться нагадування із попередженням про те, що ви, можливо, забули вкласти файл, натиснувши Відправити кнопку. Дивіться знімок екрана:


Найкращі інструменти продуктивності офісу

Kutools для Outlook - Понад 100 потужних функцій, які покращать ваш Outlook

🤖 AI Mail Assistant: Миттєві професійні електронні листи з магією штучного інтелекту – геніальні відповіді одним клацанням, ідеальний тон, багатомовна майстерність. Трансформуйте електронну пошту без зусиль! ...

???? Автоматизація електронної пошти: Поза офісом (доступно для POP та IMAP)  /  Розклад надсилання електронних листів  /  Автоматична копія/прихована копія за правилами під час надсилання електронної пошти  /  Автоматичне пересилання (розширені правила)   /  Автоматично додавати привітання   /  Автоматично розділяйте електронні листи кількох одержувачів на окремі повідомлення ...

📨 Управління електронною поштою: Легко відкликайте електронні листи  /  Блокуйте шахрайські електронні листи за темами та іншими  /  Видалити повторювані електронні листи  /  розширений пошук  /  Консолідація папок ...

📁 Вкладення ProПакетне збереження  /  Пакетне від'єднання  /  Пакетний компрес  /  Автозавантаження   /  Автоматичне від'єднання  /  Автокомпресія ...

???? Магія інтерфейсу: 😊Більше красивих і класних смайликів   /  Підвищте продуктивність Outlook за допомогою вкладок  /  Згорніть Outlook замість того, щоб закривати ...

👍 Дива в один клік: Відповісти всім із вхідними вкладеннями  /   Антифішингові електронні листи  /  🕘Показувати часовий пояс відправника ...

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

більше Особливості 100 Чекайте на ваше дослідження! Натисніть тут, щоб дізнатися більше.

 

 

Comments (34)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
The built in functionality is not as good as the VBA code !!! Test it for yourself, for example, if you copy/paste the "please check attachments" text, it won't trigger... you need to write it in the body. I prefer the VBA code version, and moreover you can customize it (language and check for other words).
This comment was minimized by the moderator on the site
Will this vba code work with signatures?
This comment was minimized by the moderator on the site
I had the same issue, you have to change the code "If iIndex > 0 And Item.Attachments.Count = 0" to "If iIndex > 0 And Item.Attachments.Count > 1 "This only works when you have 1 picture in you signiture and not emailing in a string with a lot of signitures, but at least it helps for single emails.
This comment was minimized by the moderator on the site
works well- easy to set up-thanks
This comment was minimized by the moderator on the site
Will not work for me regardless of count value. I've tried everything here and for some reason can never get the popup.
This comment was minimized by the moderator on the site
THANK YOU!
This works perfectly for me with "If iIndex > 0 And Item.Attachments.Count = 0" despite the fact that I have an image in my signature. I'm using Microsoft Office Professional Plus 2010
This comment was minimized by the moderator on the site
If anyone is having trouble using this code, images in your signature count as attachments.


I have one image in my signature, so changing the line:

If iIndex > 0 And Item.Attachments.Count = 0 Then

to:

If iIndex > 0 And Item.Attachments.Count = 0 Or Item.Attachments.Count = 1 Then

Made it work for me.
This comment was minimized by the moderator on the site
Thanks for pointing this out this was also a problem I was having. I found that your fix prompted the warning regardless of whether the word 'attach' had been used. Instead I used:

If iIndex > 0 And Item.Attachments.Count = 1 Then

This prompted the warning only when intended not whenever any email was sent.
This comment was minimized by the moderator on the site
Thanks Anthony, it worked.
This comment was minimized by the moderator on the site
This Code would not work for me. I had to use this one:
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

If InStr(1, Item.Body, "attach", vbTextCompare) > 0 Then

If Item.Attachments.Count = 0 Then

answer = MsgBox("There's no attachment, send anyway?", vbYesNo)

If answer = vbNo Then Cancel = True

End If

End If

End Sub
This comment was minimized by the moderator on the site
Is the Auto-Attachment feature designed to work when email is sent using the Ctrl+Enter keys?
This comment was minimized by the moderator on the site
Is the Auto Attachment feature designed to work when you send email using the Ctrl+Enter keys?
This comment was minimized by the moderator on the site
I've used this code and when I test it with my email address in the to line I get the error message, but if I put anyone else in there it goes through just fine. Any ideas about what could be happening?
This comment was minimized by the moderator on the site
How to set Warning when a message is sent without attachment in lotus notes 8.5.3 ?
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations