поддержка DASL-фильтров включает в себя эквивалентность, префикс, фразу и соответствие подстроки. Обратите внимание, что при фильтрации по свойству Subject префиксы, такие как «RE:» и «FW:», игнорируются.

Private WithEvents Items As Outlook.Items

Private Sub Application_Startup()
  Dim Ns As Outlook.NameSpace
  Dim Folder As Outlook.MAPIFolder

  Set Ns = Application.GetNamespace("MAPI")
  Set Folder = Ns.GetDefaultFolder(olFolderInbox)
  Set Items = Folder.Items
End Sub

Private Sub Items_ItemAdd(ByVal Item As Object)
  If TypeOf Item Is Outlook.MailItem Then
    Printattachments Item
  End If
End Sub

лал правило, чтобы outlook автоматически печатал любое входящее письмо с вложением, за исключением нескольких писем коллег.

Если я остановлю правило, макрос не будет работать сам по себе (предположим, что так и должно быть, ошибка кода?), Но если правило включено, каждое письмо с вложением будет напечатано дважды.

один с каждой страницей и один только с первой страницей. Есть ли способ обойти это? Пожалуйста, помогите и спасибо заранее!

Ответы на вопрос(1)

Ваш ответ на вопрос