Outlook VBA：將通訊組列表項添加到通訊組列表

我試圖通過Outlook中的VBA將多個子通訊組列表添加爲父通訊組列表的成員。我使用Outlook 2010中Outlook VBA：將通訊組列表項添加到通訊組列表

基本代碼Sue Mosher網上公佈（其中objItem是孩子DL，如通過對/ Next循環發現）爲：

Set objRecipient = Application.Session.CreateRecipient(objItem.Subject) 
objRecipient.Resolve 
objDistributionList.AddMember objRecipient

這個完成的任務，但是，將子DL添加爲「聯繫人」而不是鏈接到原始子DL的成員（即，當我在父DL中打開該成員（其應該是子DL）時，它顯示爲具有「 UNKNOWN「電子郵件地址）。

任何想法？

來源

2013-01-24 variant

你不能在Outlook對象模型中做到這一點。
您可以嘗試使用Redemption，其中公開RDODistListItem .AddContact方法 - 它可讓您傳遞ContactItem以及DistListItem對象作爲參數。

來源

2013-01-28 18:11:34

謝謝，德米特里。我希望避免使用Redemption，因爲要求這樣做需要我的參與，因爲這個東西被其他用戶使用。 – variant

是否擔心使用Redemption並可能導致衝突的其他應用程序？您可以使用RedemptionLoader（http://www.dimastr.com/redemption/security.htm#redemptionloader） - 這種方式甚至不需要在註冊表中註冊，您可以通過在應用程序旁複製它來部署它。 –

關注更多的是關於工作簿的傳播 - 我不知道誰可能會在工作中使用它，我們只是說它不會掌握在公司最技術精湛的人手中。 – variant

Outlook VBA：將通訊組列表項添加到通訊組列表

回答

相關問題