Нужен иакрос для outlook2003 - VB

Формулировка задачи:

Задача.
Приходит письмо от removed@mail.ru сотрудникам removed@mail.ru и removed@mail.ru
т.е в поле получателя стоят removed@mail.ru и removed@mail.ru
иногда забывабют прислать removed@mail.ru, а иногда removed@mail.ru
Какой написать макрос для outlook 2003 (2007) чтобы можно было анализировать поле кому на предмет наличая адресов removed@mail.ru и removed@mail.ru

Решение задачи: «Нужен иакрос для outlook2003»

textual
                            Листинг программы 
                        

                            <font color="00AA00">' решили, что пора отправить письмо</font>
            <font color="blue">Set</font> NewItem = Application.CreateItem(olMailItem)
            <font color="blue">Set</font> myRecipient = NewItem.Recipients.Add(<font color="teal">"xxxx@zzzz.ru"</font>)
            NewItem.Send
                        