KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Как отобразить диалоговое окно «Выбор папки» в Outlook, чтобы выбрать нужную папку?

АвторSiluviaДата изменения

Если в вашем Outlook много папок, гораздо удобнее выбрать нужную через диалоговое окно «Выбор папки», чем искать её вручную в структуре папок. В этой статье описан способ вызова этого диалогового окна для выбора папки в Outlook.

Отображение диалогового окна «Выбор папки» для выбора папки с помощью VBA
Простое отображение диалогового окна «Выбор папки» для выбора папки с помощью замечательного инструмента


Отображение диалогового окна «Выбор папки» для выбора папки с помощью VBA

Выполните следующие действия, чтобы с помощью кода VBA отобразить диалоговое окно «Выбор папки» и выбрать нужную папку.

1. Нажмите клавиши Alt+F11, чтобы открыть окно Microsoft Visual Basic для приложений.

2. В окне Microsoft Visual Basic для приложений выберите пункты Вставка > Модуль. Затем скопируйте приведённый ниже код VBA в окно модуля.

Код VBA: Отображение диалогового окна «Выбор папки» для выбора папки

Sub PickFolder()
'Update by Extendoffice 20180504
Dim xNameSpace As NameSpace
Dim xPickFolder As Folder
Dim xExplorer As Explorer
On Error Resume Next
Set xNameSpace = Outlook.Application.Session
Set xPickFolder = xNameSpace.PickFolder
If TypeName(xPickFolder) = "Nothing" Then Exit Sub
Set xExplorer = Outlook.Application.ActiveExplorer
xExplorer.Close
xPickFolder.Display
Outlook.Application.ActiveExplorer.WindowState = olMaximized
Set xPickFolder = Nothing
Set xNameSpace = Nothing
End Sub

3. Нажмите клавиши Alt+Q, чтобы закрыть окно Microsoft Visual Basic для приложений.

4. Щелкните кнопку Настроить панель быстрого доступа, а затем в раскрывающемся меню выберите пункт Другие команды. См. снимок экрана:

шаги отображения диалогового окна «Обзор папок» для выбора папки в Outlook с помощью VBA

5. В диалоговом окне Параметры Outlook выполните следующие действия:

5,1 Выберите пункт Макросыв поле Выбрать команды изРаскрывающийся список;
5,2 Выберите имя макроса Project1.FolderPickв списке команд;
5,3 Нажмите кнопку Добавить;
5,4 Выделите макрос FolderPickв правом поле Настроить панель быстрого доступаи нажмите кнопку Изменить;
5,5 Выберите значок для макроса и нажмите кнопку ОК;
5,6 Нажмите кнопку ОК, чтобы закрыть диалоговое окно Параметры Outlook. См. снимок экрана:
шаги отображения диалогового окна «Обзор папок» для выбора папки в Outlook с помощью VBA

6. Теперь вы увидите кнопку папки на панели быстрого доступа. Нажмите её, чтобы открыть диалоговое окно «Выбор папки». Выберите нужную папку и нажмите кнопку ОК. См. снимок экрана:

шаги отображения диалогового окна «Обзор папок» для выбора папки в Outlook с помощью VBA

Выбранная папка немедленно откроется в Outlook.


Простое отображение диалогового окна «Выбор папки» для выбора папки с помощью замечательного инструмента

👉 Работайте эффективнее в Outlook!Скачать Kutools для Outlook, чтобы повысить продуктивность с помощью 100+ функций, экономящих время, — бесплатно на 30 дней!

Описанный выше метод может показаться не слишком простым. Поэтому рекомендуем воспользоваться функцией Открыть указанную папку Outlook из Kutools для Outlook. Благодаря этой функции вы сможете открыть диалоговое окно со всеми папками или с папками определённого типа в Outlook и легко перейти к нужной папке.

1. После установки Kutools для Outlook щелкните KUTOOLS PLUS > Перейти к, чтобы активировать функцию.

шаги отображения диалогового окна «Обзор папок» для выбора папки в Outlook с kutools for outlook

2. В открывшемся диалоговом окне Перейти к выполните следующую настройку.

2,1) По умолчанию выбраны все типы папок. При необходимости вы можете указать конкретный Указать тип, чтобы отображались только папки этого типа;
2,2) Вы можете быстро найти папку, введя её Имя папки в поле Поиск;
2,3) Дважды щелкните папку в списке — это сразу откроет папку и закроет диалоговое окно.
Либо выделите папку и нажмите кнопку ОК, чтобы открыть папку и закрыть диалоговое окно.
шаги отображения диалогового окна «Обзор папок» для выбора папки в Outlook с kutools for outlook

Связанные статьи:


Лучшие инструменты повышения продуктивности в Office

🤖KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции
Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул
Супер ПОИСК:VLookup по нескольким критериям  |  VLookup по нескольким значениям  |   VLookup по нескольким листам   |   Распознавание нечетких соответствий
Расширенный раскрывающийся список:Быстрое создание выпадающего списка   |  Зависимый выпадающий список   |  Выпадающий список с множественным выбором
Управление столбцами:Добавление заданного количества столбцов|Перемещение столбцов|Переключение видимости скрытых столбцов|Сравнение диапазонов и столбцов
Избранные функции:Сетка фокусировки   |  Просмотр дизайна   |Улучшенная строка формулы   | Управление рабочими книгами и листами   |  Библиотека ресурсов(автотекст)|  Выбор даты   |  Объединить листы  |  Шифрование/Расшифровать ячейки   | Отправка писем по списку   |  Супер фильтр   |   Специальный фильтр(Фильтр ячеек с жирным шрифтом/курсив/зачёркивание…) …
Лучшие наборы инструментов 15:12 Текстовыеинструменты(Добавить текст,Удалить определенные символы, …)|   50+Типыдиаграмм(Диаграмма Ганта, …)|   40+ Практические формулы(Рассчитать возраст на основе даты рождения, …)|   19 Инструментывставки(Вставить QR-код,Вставка изображения по пути, …)|   12 Инструментыпреобразования(Преобразовать в слова,Конвертация валют, …)|   7 Объединить и разделитьИнструменты(Расширенное объединение строк,Разделить ячейки, …)|… и многое другое
Используйте Kutools на предпочитаемом языке — поддержка английского, испанского, немецкого, французского, китайского и ещё 40+ языков!

Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…


Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу

  • Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
  • Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!

Все надстройки Kutools — один установщик

Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.

ExcelWordOutlookTabsPowerPoint
  • Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
  • Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
  • Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
  • 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек