Перейти до основного матеріалу

Як об’єднати всі вхідні скриньки кількох облікових записів, щоб відображати всі електронні листи разом у програмі Outlook?

Outlook підтримує кілька облікових записів електронної пошти, що працюють одночасно. За замовчуванням кожен обліковий запис електронної пошти має власну папку "Вхідні" в Outlook. Отже, чим більше облікового запису електронної пошти ви створили в Outlook, тим більше буде вхідних. Вам доведеться перейти на окрему поштову скриньку вперед-назад, щоб перевірити наявність електронних листів. Чи є хороший спосіб створити уніфіковану папку "Вхідні", яка може збирати всі папки "Вхідні" кількох облікових записів разом? Ця стаття покаже вам спосіб її досягнення.

Створіть уніфіковану поштову скриньку кількох облікових записів електронної пошти з кодом VBA


Створіть уніфіковану поштову скриньку кількох облікових записів електронної пошти з кодом VBA

Будь ласка, виконайте наступні дії, щоб об’єднати всі поштові скриньки кількох облікових записів для відображення всіх отриманих електронних листів разом у програмі Outlook.

1 Натисніть кнопку інший + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.

2 В Microsoft Visual Basic для додатків вікно, скопіюйте нижче коду VBA в ThisOutlookSession вікно коду.

Код VBA: Створіть уніфіковану поштову скриньку з кількох облікових записів електронної пошти:

Sub UnifiedInbox()
'Update by Extendoffice 20180504
Dim xExplorer As Outlook.Explorer
Dim xSearch As String
On Error Resume Next
xSearch = "folderpath:Inbox"
Set xExplorer = Outlook.Application.ActiveExplorer
xExplorer.Search xSearch, olSearchScopeAllFolders
Set xApp = Nothing
End Sub

3 Потім натисніть кнопку інший + Q клавіші, щоб зберегти та закрити Microsoft Visual Basic для додатків вікна.

4. Натисніть Налаштування панелі швидкого доступу Кнопка, а потім натисніть кнопку Більше команд зі спадного меню. Дивіться знімок екрана:

5 В Параметри Outlook у діалоговому вікні потрібно:

5.1 Виберіть Макрос від Виберіть команди з випадаючий список;

5.2 Виберіть Project1.ThisOutlookSession.UnifiedInbox з вікна команд;

5.3 Натисніть кнопку додавати кнопка;

5.4 Продовжуйте вибирати ThisOutlookSession праворуч Налаштування панелі швидкого доступу , а потім клацніть на Змінювати кнопка;

5.5 Виберіть кнопку зміни для макросу, а потім натисніть кнопку OK кнопка;

5.6 Натисніть кнопку OK кнопка в Параметри Outlook діалогове вікно. Дивіться знімок екрана:

6. Тоді кнопка зміни відображається на Панель швидкого доступу. Клацніть на кнопку, тоді електронні листи у всіх папках вхідних повідомлень декількох облікових записів електронної пошти будуть шукані та об’єднані разом, як показано на знімку екрана нижче:

Найкращі інструменти продуктивності офісу

🤖 Kutools AI Aide: Революціонізуйте аналіз даних на основі: Інтелектуальне виконання   |  Згенерувати код  |  Створення спеціальних формул  |  Аналізуйте дані та створюйте діаграми  |  Викликати функції Kutools...
Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями    Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул    Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок    Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

Опис


Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
This worked perfectly as a way to add capability to search for flagged items across multiple inboxes and .pst files, with a minor edit. Thank you so much for solving a major annoyance with how Outlook makes search folders.
This comment was minimized by the moderator on the site
Works fine for me on Outlook 365 Desktop Version for Windows 11 - thank you very much! I Only had to change the folder to "ordnerpfad:posteingang" due to the German version.
Do you have any ideas, how to add all junk folders to the macro, so that all emails from all Inboxes and Junk-folders are shown as result? If possible also with the German name for the folder - or maybe you know where to look it up?
Thank you very much in advance and best wishes from Germany!
This comment was minimized by the moderator on the site
This worked for me first time, but after an Office Update (the following day) it failed. I contacted Addin Technology via their 'contact us' link but was advised to post here, so here I am. In between times, I solved the issue. You need to enable macros at a suitable level. Go to File->Options-Trust Centre-Trust CentreSettings->Macro Settings and select the third option down, 'Notifications for all macros'. This is slightly more risky than the recommended level, but less so than the "Enable all" option. Clever solution, but I can't help feel that there's a way to achieve a unified inbox using Office options without a VBA macro.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations