outlook automatic reply com contagem de mensagens não lidas

Question

Eu recebo centenas de e-mails diários e estou tentando configurar uma resposta fora do escritório para o Outlook que informará ao destinatário que eu tenho X e-mails não lidos e que eu os acessarei como logo que possível.

Existe um script ou um marcador de posição em um modelo que eu possa usar para esse efeito?

    

Answer 1

Tudo bem, eu levei um tiro nisso. Há duas etapas - escrevendo o script e, em seguida, criando uma regra para executar o script .

Primeira parte

Pressione Alt + F11 para abrir o editor do VBA. Clique com o botão direito em insert - module . Cole o código abaixo no módulo e vá em debug - compile project

PrivateSubmyOlItems_ItemAdd(ByValItemAsObject)EndSubSubAutoResponse(objmsgAsOutlook.MailItem)'definemyreplymessageDimobjReplyAsMailItem'let'sgetourselvestheinbox!DiminboxAsMAPIFolderSetinbox=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

Segunda parte

Agora vamos para regras . Você não especifica em qual outlook você está, por isso estou fazendo isso no Outlook 2010:

1. home - rules - create rule - advanced options
 2. Selecione sua primeira condição. Se você quiser fazer isso para todos os e-mails, use algo como emails sent only to me ou where my name is in the to box .. ou não selecione nada para que seja aplicado a todas as mensagens que você recebe.  3. Pressione Próximo e role para baixo e selecione run a script
 4. Clique no link para um script e selecione project1.autoresponse ou o nome que você escolheu. Deve ser o único script disponível para você. Agora clique em OK
 5. Agora aperte finish e OK

Notasparaaprimeiraparte

Vocêpodealteraramensagemobjreply.bodyparaatenderàssuasnecessidades,bastaconcatenaroinxbox.unreaditemcountentresuasmensagens.Alémdisso,vocêpodealteraroobjreply.subjectsequiserespecificaroutroassuntocomo"email acknowledgement re:" ou o que for.

Último cabeçalho

Isso funciona para mim enviando e-mails para mim mesmo. Pode avisá-lo que pode ser local apenas se você estiver em troca, tudo bem. Também é possível que, se você for super-e-mail, ele seja executado por trás, pois os e-mails voam como gafanhotos, mas não há muito que possamos fazer sobre isso. Supondo que você não receba consistentemente mais de um e-mail a cada 10 segundos, tudo bem. No entanto, você pode querer colocar uma declaração if se vier de você não responder ou você vai acabar em um loop.