Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Сохранение вложений из нескольких писем (Outlook), batch attachments saving
 
Друзья, нашел вот такой код для этой же цели
Код
Dim myobj As Object
Dim att As Attachment
For Each myobj In Application.ActiveExplorer.Selection
If myobj.Class = olMail Then
For Each att In myobj.Attachments
att.SaveAsFile "D:\Attachments\" + att.FileName
Next
End If
Next
Тоже хорошо и быстро работает, но...

Можете подсказать как модифицировать этот код?
Много писем от одного отправителя. Вложение с одним и тем же называнием. Но тема письма всегда разная.
Как можно этот скрипт изменить так что бы он сохранял вложения, переименовывая его по называнию темы письма?

Очень выручите от обезьяньего труда. Спасибо!
Страницы: 1
Наверх