Подскажите пожалуйста как преобразовать скрипт так что бы
сохранение аттача происходило без открытия письма по даблклику.
Либо как привязать выполнение скрипта к определенной папке в outlook'е. Хотя бы какими методами пользоватся или в каком направлении копать? ActiveInspector.CurrentItem требует что бы
письмо было активно цитирую хелп по CurrentItem:
If there is no currently open item, an error will be returned.
Т.Е нужно что бы письмо с аттачем было открыто. Как это обойти?
Sub SaveAs()
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.ActiveInspector.CurrentItem
Set myAttachments = myItem.Attachments
myAttachments.Item(1).SaveAsFile "C:\" & _
myAttachments.Item(1).DisplayName
End Sub
VBA знаю несколько дней. Помогите. Большое спасибо.