Используйте Excel VBA для поиска определенных входящих почтовых ящиков в среде с несколькими входящими сообщениями

Я пробовал поиск группы форумов, но не смог найти решение моей проблемы. Я признаю, что мое понимание объектов VBA ограничено. У меня есть отчет Excel VBA, который создает объект Outlook, а затем проверяет входящие папки Outlook по умолчанию, пока не найдет непрочитанное письмо. Я получил код для работы на моем компьютере. Тем не менее, компьютер, который будет запускать это, имеет два (2) разных адреса электронной почты / почтовые ящики, привязанные к Outlook (один – это личный почтовый ящик, а другой – групповой входящий).

Код, который я использовал для поиска моего личного почтового ящика, это (он продолжает поиск непрочитанных писем и т. Д.):

Application.ScreenUpdating = False Dim oOlAp As Object, oOlns As Object, oOlInb As Object Dim oOlItm As Object, oOlAtch As Object '~~> New File Name for the attachment Dim NewFileName As String NewFileName = "ActInv Export" '~~> Get Outlook instance Set oOlAp = GetObject(, "Outlook.application") Set oOlns = oOlAp.GetNamespace("MAPI") Set oOlInb = oOlns.GetDefaultFolder(olFolderInbox) 

Однако это указывает только на папку входящих сообщений по умолчанию (то есть на личную почту). Как изменить его для установки объекта для поиска в почтовых ящиках групповой электронной почты?

Я не могу быть уверен (так как я не на компьютере, на котором работает Outlook прямо сейчас и, следовательно, не могу поиграть с ним), но я думаю, что ответ на ваш вопрос может содержаться в ответе на этот вопрос о создании трекер для общего почтового ящика Outlook .

Я думаю, что ключ лежит в линии

Set f = olns.Folders("Mailbox - Name, Name")

который параллелен, но отличается от вашего утверждения

Set oOlInb = oOlns.GetDefaultFolder(olFolderInbox)

Удачи!

  • Захват графов (объектов) в пределах выделения
  • Автоматически подключаться к ms excel и проверять наличие непрочитанных сообщений с помощью excel vba
  • Макрос Excel для подсчета элементов в Outlook Общий почтовый ящик по дате
  • Excel VBA Поиск Outlook GAL с использованием свойства псевдонима ExchangeUser
  • Вставка форматированного диапазона Excel в сообщение Outlook
  • Скрипты VB зависают на большее количество строк в excel, хотя мне нужны данные из одной строки из excel
  • Count Письма по месяцам года
  • Поиск LastRow из приложения Excel через Outlook VBA
  • Запуск макроса Excel из Outlook
  • Ошибка Excel VBA «определяемый пользователем тип не определен» с Outlook
  • Выберите папку Outlook с Excel VBA
  • Interesting Posts

    Есть ли функция, которая вернет «", когда вход ref пуст, и его содержимое, если оно нет?

    Как получить значение столбца с известным заголовком столбца

    Считыватель электронных таблиц не может определить цвет заливки, если файл не открыт + не сохранен в LibreOffice

    Как объединить два листа полностью – с разными названиями таблиц, форматом и заголовками рабочих таблиц

    Избегание диалогового окна «Сохранить как» в сценарии Excel VBA

    Как я могу обслуживать электронные таблицы Excel в IOS9 через Интернет?

    Excel VBA: возможно ли получить адрес каждой ячейки в цикле и использовать их из цикла

    Вставка полутонов между данными в ячейке в excel

    Экспорт ASP.NET в Excel показывает разметку html в электронной таблице

    Стереть пустые ячейки в массиве

    ячейка поиска для строки, затем запустите макрос, если строка найдена

    Excel VBA: определение переменной, которая включает ссылку на другую динамическую переменную

    Из Access 2016: Programmaticaly устанавливает подпись и электронную почту Excel с помощью vbscript

    Найти, к какому диапазону принадлежит ячейка

    Импорт файла Excel в Access: настройки центра доверия?

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