Explorer / Свойство
Explorer.Selection
Выделение — Выделенные элементы в списке папки.
Selection As Selection
Когда использовать
Макрос «сохранить выделенное». Всегда проверяйте TypeName каждого элемента.
Версии и среда
Outlook 2010–365
Минимальный пример
For i = 1 To exp.Selection.Count
If TypeName(exp.Selection(i)) = "MailItem" Then
Set objMail = exp.Selection(i)
End If
Next i
Типичный сбой
Приведение Selection(i) к MailItem падает на собрании или отчёте о доставке.
Рецепты
-
Сохранить выделенные письма Outlook
Нужно прогнать несколько писем из списка папки и не сохранить собрание как письмо.