VBA Outlook - Получить адреса электронной почты из прикрепленных файлов .msg

Question

Я хотел бы иметь код, который поможет мне получить адрес электронной почты отправителя прикрепленного файла .msg.

У меня есть письмо с прилагаемыми 10 электронными письмами. Мне нужно скопировать адрес отправителя из них в буфер обмена или лист Excel.

Answer 1

Вы должны были бы

1. сохранить вложение как msg файл,
2. открыть его с помощью Namespace.OpenSharedItem
3. когда вы открываете его как MailItem, вы можете прочитать MailItem.Sender свойства.

Вы также можете использовать Redemption - это позволяет непосредственно открывать вложения сообщений в качестве объектов RDOMail с использованием RDOAttachment.EmbeddedMsg.