Как фильтровать unflagged элементы в Outlook с помощью vba

При создании макроса, который извлекает некоторые данные из всех незакрепленных сообщений в Outlook. Я могу получить данные с помощью цикла и проверки состояния каждой почты в папке «Входящие», однако количество писем в папке «Входящие» огромно. так что есть способ фильтровать только незафиксированный элемент, а затем получать данные из отфильтрованных писем.

Я попробовал следующий код. Однако он не работает для меня.

Mailbox = Cells(k, 1).Value Set Fldr = olNs.Folders(Mailbox).Folders("inbox") Fldr.Items.Restrict ("followupflag:unflagged") 

Есть ли способ, с помощью которого я могу ускорить макрос.

Попробуйте Restrict("[FlagStatus] = 0") . Имейте в виду, что Restrict возвращает новый экземпляр коллекции Items.

Объектная модель Outlook предоставляет следующие способы получения подмножества элементов, соответствующих вашим условиям:

  1. Метод Ограничения класса Items. См. Раздел « Как: использовать метод ограничения доступа для извлечения почтовых элементов Outlook из папки для получения дополнительной информации.

  2. Методы Find / FindNext класса Items. См. Как использовать методы Find и FindNext для извлечения почтовых элементов Outlook из папки (C #, VB.NET) .

  3. Метод AdvancedSearch класса Application. См. Расширенный поиск в Outlook программно: C #, VB.NET . Ключевыми преимуществами использования метода AdvancedSearch в Outlook являются:

    • Поиск выполняется в другом потоке. Вам не нужно запускать другой поток вручную, так как метод AdvancedSearch автоматически запускает его в фоновом режиме.
    • Возможность поиска любых типов элементов: почта, назначение, календарь, заметки и т. Д. В любом месте, то есть вне области определенной папки. Методы Ограничения и Найти / FindNext могут применяться к определенной коллекции элементов (см. Свойство Items класса Folder в Outlook).
    • Полная поддержка запросов DASL (пользовательские свойства могут также использоваться для поиска). Подробнее об этом можно прочитать в статье «Фильтрация» в MSDN. Чтобы повысить эффективность поиска, ключевые слова Instant Search можно использовать, если для хранилища включен Instant Search (см. Свойство IsInstantSearchEnabled класса Store).
    • Наконец, вы можете остановить процесс поиска в любой момент, используя метод Stop для класса Search.

Наконец, образец кода включен в статьи.

  • Как подключить активную книгу Excel к электронному письму
  • Получение единой записи в Outlook Outlook для экспорта макроса vba на основе имени
  • Выбор первой записи нескольких записей при разрешении получателя Outlook
  • Интегрируйте правило Outlook «Запускать сценарий» в код Excel VBA, который отправляет электронную почту
  • Outlook для получения количества писем, полученных в определенные дни
  • Учебник Excel для Outlook
  • Outlook VBA для сохранения вложения из почты, а затем скопировать данные вложения в другое Excel и отправить send excel по почте
  • Открыть файл из Outlook в Excel и сохранить в другом формате в зависимости от отправителя
  • Укажите папку для сохранения файла Excel
  • Excel VBA для включения тела в перенаправленный адрес электронной почты Outlook
  • Как выделение жирным шрифтом или цвет текста в автоматическом почтовом ящике из Excel VBA
  • Interesting Posts

    Кнопка экспорта файла без навигации по страницам в ASP.net MVC4

    Функция Coldfusion SpreadsheetAddImage не вставляет изображение

    выбор рабочего листа с несколькими книгами открывает судороги

    Форматировать строки на основе значений в двух ячейках в каждой строке

    Excel: обработка формата даты до стандартного формата даты

    Динамический Target.Adress excel vba

    excel – удалить строки, в которых существует повторяющаяся запись в поле

    Экспорт файла Excel с расширением .xlsx

    чтение колонки из Excel и выполнение определенной математики

    Установка точности при чтении значений из Excel в C #

    Как использовать диапазон столбцов, найденных с использованием массива в качестве входных данных, и сравнить диапазон с числом, чтобы получить результат как «истинный» или «ложный» в другом столбце?

    Excel VSTO не загружается, если есть макросы VBA

    Заполнение ячеек Excel с помощью openpyxl

    Скрытие ленты Excel с помощью VB.net

    Нужна помощь с макросом Excel для организации опробованного опроса

    Давайте будем гением компьютера.