Makro programu Outlook działa dwa razy

1

Używam makra, aby wysłać automatyczną odpowiedź na SMS-y, które przychodzą mi do głowy. To działa, ale wysyła odpowiedź do naszych klientów dwa razy za każdym razem. Wszelkie porady, jak to zatrzymać. Makro to:

Sub ReplytoMessage(Item As Outlook.MailItem)
Set myReply = Item.Reply
If Item.BodyFormat = olFormatHTML Then
myReply.HTMLBody = "Thank you for your message. We will deal with it shortly." & vbCrLf & myReply.HTMLBody
Else
 myReply.Body = "Thank you for your message. We will deal with it shortly." & vbCrLf & myReply.Body
End If
myReply.Send
End Sub
AlexW1604
źródło
Jak uruchamiasz makro?
ᴇcʜιᴇ007
Zgodnie z regułą: kiedy wiadomość przychodzi z SMS-em w temacie i tylko na tym komputerze. Uruchom 'Project1.ThisOutlookSession.ReplytoMessage i przestań przetwarzać więcej reguł
AlexW1604
Czy potwierdziłeś, że nie masz więcej niż kopię tej reguły? Ponadto, czy otrzymują dwa różne e-maile, które są identyczne (nagłówki i wszystkie?), Czy tylko widzą ciało wiele razy, czy ???
ᴇcʜιᴇ007
Mam tylko 1 kopię reguły. Zasada dotyczy tylko wtedy, gdy jest w temacie. Myślę, że makro działa tylko dwa razy
AlexW1604
1
Umieść punkt przerwania na tym makrze, aby dowiedzieć się, dlaczego to makro jest uruchamiane dwukrotnie.
thims