Как сохранить полный контакт из GAL из списка dist и сохранить как личный контакт в outlook vba

Question

Когда я открываю список рассылки и дважды щелкаю по члену, который не является частью моих личных контактов, и выбираю добавить в контакты из меню дополнительных параметров, он открывает их контактную информацию. Затем я могу сохранить его в своих личных контактах. Есть ли способ сделать это через VBA, чтобы мне не нужно было нажимать и сохранять каждый контакт в отдельности? Спасибо

Answer 1

Если вы используете объектную модель Outlook, у вас нет выбора, чтобы явно создать новый контакт и скопировать по одному свойству за раз.

Если вы можете использовать Redemption, вы можете вызвать RDOAddressEntry.CopyTo и передать (вновь созданный) контакт в качестве параметра.

Откуда берется адрес источника?