Bỏ qua nội dung chính

Làm cách nào để hợp nhất tất cả hộp thư đến của nhiều tài khoản để hiển thị tất cả các email cùng nhau trong Outlook?

Outlook hỗ trợ nhiều tài khoản email chạy cùng một lúc. Theo mặc định, mỗi tài khoản email có hộp thư đến riêng trong Outlook. Do đó, bạn càng tạo nhiều tài khoản email trong Outlook thì càng có nhiều hộp thư đến. Bạn phải chuyển qua lại hộp thư email riêng biệt để kiểm tra email. Có cách nào hay để tạo một hộp thư đến thống nhất, có thể gom tất cả hộp thư đến của nhiều tài khoản lại với nhau không? Bài viết này sẽ chỉ cho bạn một phương pháp để đạt được nó.

Tạo một hộp thư đến thống nhất của nhiều tài khoản email bằng mã VBA


Tạo một hộp thư đến thống nhất của nhiều tài khoản email bằng mã VBA

Vui lòng làm như sau để thống nhất tất cả hộp thư đến của nhiều tài khoản để hiển thị tất cả các email đã nhận cùng nhau trong Outlook.

1. Nhấn nút Khác + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. bên trong Microsoft Visual Basic cho các ứng dụng cửa sổ, sao chép mã VBA bên dưới vào ĐâyOutlookSession cửa sổ mã.

Mã VBA: Tạo một hộp thư đến thống nhất của nhiều tài khoản email:

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. Sau đó nhấn Khác + Q các phím để lưu và đóng Microsoft Visual Basic cho các ứng dụng cửa sổ.

4. Nhấp vào Tùy chỉnh thanh công cụ truy cập nhanh nút và sau đó nhấp vào Các lệnh khác từ menu thả xuống. Xem ảnh chụp màn hình:

5. bên trong Tùy chọn Outlook hộp thoại, bạn cần:

5.1 Chọn Macros từ Chọn lệnh từ danh sách thả xuống;

5.2 Chọn Project1.ThisOutlookSession.UnifiedInbox từ hộp lệnh;

5.3 Nhấp vào Thêm Nút;

5.4 Tiếp tục chọn ĐâyOutlookSession ở bên phải Tùy chỉnh thanh công cụ truy cập nhanh và sau đó bấm vào Sửa đổi Nút;

5.5 Chọn một nút sửa đổi cho macro và sau đó nhấp vào OK Nút;

5.6 Nhấp vào OK nút trong Tùy chọn Outlook hộp thoại. Xem ảnh chụp màn hình:

6. Sau đó, nút sửa đổi đang hiển thị trên Thanh công cụ truy cập nhanh. Nhấp vào nút, sau đó các email trong tất cả hộp thư đến của nhiều tài khoản email được tìm kiếm và thống nhất với nhau như hình minh họa bên dưới:

Công cụ năng suất văn phòng tốt nhất

🤖 Trợ lý AI của Kutools: Cách mạng hóa việc phân tích dữ liệu dựa trên: Thực thi thông minh   |  Tạo mã  |  Tạo công thức tùy chỉnh  |  Phân tích dữ liệu và tạo biểu đồ  |  Gọi các hàm Kutools...
Các tính năng phổ biến: Tìm, đánh dấu hoặc xác định các bản sao   |  Xóa hàng trống   |  Kết hợp các cột hoặc ô mà không làm mất dữ liệu   |   Vòng không có công thức hữu ích. Cảm ơn !
Siêu tra cứu: Nhiều tiêu chí VLookup    VLookup Nhiều Giá Trị  |   VLookup trên nhiều trang tính   |   Tra cứu mờ ....
Danh sách thả xuống nâng cao: Tạo nhanh danh sách thả xuống   |  Danh sách thả xuống phụ thuộc   |  Danh sách thả xuống nhiều lựa chọn ....
Trình quản lý cột: Thêm một số cột cụ thể  |  Di chuyển cột  |  Chuyển đổi trạng thái hiển thị của các cột ẩn  |  So sánh dãy và cột hữu ích. Cảm ơn !
Các tính năng nổi bật: Tiêu điểm lưới   |  Chế độ xem thiết kế   |   Thanh công thức lớn    Trình quản lý sổ làm việc & trang tính   |  Thư viện tài nguyên (Văn bản tự động)   |  Bảng chọn ngày   |  Kết hợp các bảng tính   |  Mã hóa/Giải mã ô    Gửi email theo danh sách   |  Siêu lọc   |   Bộ lọc đặc biệt (lọc in đậm/nghiêng/gạch ngang...) ...
15 bộ công cụ hàng đầu12 bản văn CÔNG CỤ (thêm văn bản, Xóa ký tự,...)   |   50 + Biểu đồ Các loại (Biểu đồ Gantt,...)   |   40+ Thực tế Công thức (Tính tuổi dựa trên ngày sinh,...)   |   19 chèn CÔNG CỤ (Chèn mã QR, Chèn ảnh từ đường dẫn,...)   |   12 Chuyển đổi CÔNG CỤ (Số thành từ, Chuyển đổi tiền tệ,...)   |   7 Hợp nhất & Tách CÔNG CỤ (Các hàng kết hợp nâng cao, Chia ô,...)   |   ... và nhiều hơn nữa

Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian.  Bấm vào đây để có được tính năng bạn cần nhất...

Mô tả


Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
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