Как можно в Outlook сделать правило, чтобы вложения из нужных писем сохранялись в папку на диске?

1. Сервис - правила и оповещения
2. В правилах жмем "Новое"
3. В графе "Какие сообщения отбирать" выбрать нужные вам критерии
4. В графе "Что делать с сообщением" - запустить сценарий
5. В графе "Выбор сценария выбираем ваш макрос"
6. Жмем ок

Если макроса нет, то перед всеми этими действиями добавьте этот

Public Sub saveAttachtoDisk(itm As Outlook.MailItem)
Dim objAtt As Outlook.Attachment
Dim saveFolder As String
dateOfMailItem = Format(itm.CreationTime, "yyyy.mm.dd.hhnnss")
saveFolder = "C:\Temp"
For Each objAtt In itm.Attachments
objAtt.SaveAsFile saveFolder & "\" & dateOfMailItem & "_" & objAtt.FileName
Set objAtt = Nothing
Next
End Sub

Добавлять через alt+f11