Автоматический ответ outlook с количеством непрочитанных сообщений

Я получаю сотни ежедневных электронных писем, и мне нужно настроить внешний вид ответа для Outlook, который будет информировать получателя о том, что у меня есть непрочитанные электронные письма X, и что я получу их как можно скорее.

Есть ли сценарий или заполнитель в шаблоне, который я могу использовать для этого эффекта?

Источник

1 ответ

Решение

Хорошо, я сделал снимок в этом. Есть два шага - написание сценария и затем создание правила для выполнения сценария.

Первая часть

Нажмите Alt + F11, чтобы вызвать редактор VBA. Щелкните правой кнопкой мыши insert - module, Вставьте приведенный ниже код в модуль и перейдите debug - compile project

введите описание здесь

Private Sub myOlItems_ItemAdd(ByVal Item As Object)

End Sub

Sub AutoResponse(objmsg As Outlook.MailItem)

    ' define my reply message
    Dim objReply As MailItem
    ' let's get ourselves the inbox!
    Dim inbox As MAPIFolder
    Set inbox = Application.GetNamespace("MAPI"). _
    GetDefaultFolder(olFolderInbox)

    ' Let's get this reply going!
    Set objReply = objmsg.Reply
    ' Subject Re: their subject. Standard
    objReply.Subject = "Re: " & objReply.Subject
    ' Body - you define this, use the variable for the unread count in inbox
    objReply.Body = "Your email has been received. I currently have " & inbox.UnReadItemCount & " unread emails in my inbox and I will get yours as soon as I can"

    ' Send this thing!
    objReply.Send
    ' Reset
    Set objReply = Nothing

End Sub

Вторая часть

Теперь мы идем к правилам. Вы не указываете свой внешний вид, поэтому я делаю это в Outlook 2010:

1.home - rules - create rule - advanced options
2. Выберите ваше первое условие. Если вы хотите сделать это для всей электронной почты, есть что-то вроде emails sent only to me или же where my name is in the to box.. или не выбирайте ничего, чтобы оно относилось к каждому полученному сообщению
3. Нажмите Далее, прокрутите вниз и выберите run a script
4. Нажмите на ссылку для скрипта и выберите project1.autoresponse или как вы там назвали. Должен быть единственным доступным для вас сценарием. Теперь нажмите ОК
5. Теперь нажмите Готово и ОК

введите описание здесь

Примечания к первой части

Вы можете изменить objreply.body сообщение в соответствии с вашими потребностями, просто объедините inxbox.unreaditemcount между вашими сообщениями. Кроме того, вы можете изменить объект objreply.subject, если вы хотите указать другой предмет, например, "подтверждение по электронной почте" или что-то еще.

Последний заголовок

Это работает для меня, посылая мне письма. Это может предупредить вас, что это может быть локально, только если вы на обмене, это нормально. Также возможно, что если вы супермен электронной почты, он будет отставать, поскольку электронные письма летят, как саранча, но мы ничего не можем с этим поделать. Предполагая, что вы не получаете постоянно более 1 электронного письма каждые 10 секунд, все будет в порядке. Тем не менее, вы можете захотеть добавить оператор if, если он исходит от вас, не отвечаете, или вы в конечном итоге зациклились.

Источник
Другие вопросы по тегам