Доступ к Item.To в Outlook VBA

Question

В макросе мне нужно получить доступ к именам в Item.To при наборе электронного письма.
Например, при наборе электронного письма перейдите в меню инструментов и запустите макрос из подменю 'macro'.

Когда код пытается использовать Item.To, возникает исключение отладки, и инструмент отладки сообщает мне «Требуется объект».

Я могу получить доступ к Item.To во время Application_ItemSend, поэтому у меня есть часть этого права.

Спасибо, что подумали об этом, я застрял на этом!

Answer 1

В прошлом я мог получить доступ к строке Комо, используя код, подобный следующему:

With Application.ActiveInspector
    If TypeOf .CurrentItem Is Outlook.MailItem Then
        Debug.Print "To: " & .CurrentItem.To

        'If you want to access each recipient
        Set myRecipients = .CurrentItem.Recipients
        Dim myRecipient As recipient
        Dim recipientToList As New Collection

        For Each myRecipient In myRecipients
                recipientToList.Add myRecipient.Name                
        Next

    End If
End With

Я загрузил ArrayList с каждым получателем для сортировки и т. Д.