在outlook中訪問Item.To VBA

Question

在宏中，我需要在輸入電子郵件時訪問Item.To中的名稱。
例如，在輸入電子郵件時轉到工具菜單並從「宏」子菜單運行宏。

當代碼嘗試使用Item.To時出現調試異常，調試工具告訴我「Object required」。

我可以訪問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與每個收件人用於排序等