ไปยังเนื้อหาหลัก

วิธีการรวมกล่องจดหมายเข้าของหลายบัญชีเพื่อแสดงอีเมลทั้งหมดเข้าด้วยกันใน Outlook?

Outlook รองรับบัญชีอีเมลหลายบัญชีที่ทำงานร่วมกันในเวลาเดียวกัน โดยค่าเริ่มต้นบัญชีอีเมลแต่ละบัญชีจะมีกล่องจดหมายของตัวเองใน Outlook ดังนั้นยิ่งคุณสร้างบัญชีอีเมลใน Outlook มากเท่าใดก็จะมีกล่องจดหมายมากขึ้น คุณต้องเปลี่ยนไปใช้กล่องจดหมายอีเมลที่แยกจากกันไปมาเพื่อตรวจสอบอีเมล มีวิธีที่ดีในการสร้างกล่องจดหมายแบบรวมซึ่งสามารถรวบรวมกล่องจดหมายทั้งหมดของหลายบัญชีเข้าด้วยกันได้หรือไม่? บทความนี้จะแสดงวิธีการเพื่อให้บรรลุ

สร้างกล่องจดหมายรวมของบัญชีอีเมลหลายบัญชีด้วยรหัส VBA


สร้างกล่องจดหมายรวมของบัญชีอีเมลหลายบัญชีด้วยรหัส VBA

โปรดทำดังนี้เพื่อรวมกล่องจดหมายทั้งหมดของหลายบัญชีเพื่อแสดงอีเมลที่ได้รับทั้งหมดเข้าด้วยกันใน Outlook

1 กด อื่น ๆ + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน ให้คัดลอกโค้ด VBA ด้านล่างลงในไฟล์ นี้OutlookSession หน้าต่างรหัส

รหัส 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 เลือกไฟล์ นี้OutlookSession ทางด้านขวา ปรับแต่งแถบเครื่องมือด่วน จากนั้นคลิกที่ไฟล์ แก้ไข ปุ่ม;

5.5 เลือกปุ่มแก้ไขสำหรับมาโครจากนั้นคลิกปุ่ม OK ปุ่ม;

5.6 คลิกปุ่ม OK ปุ่มใน ตัวเลือกของ outlook กล่องโต้ตอบ ดูภาพหน้าจอ:

6. จากนั้นปุ่มแก้ไขจะแสดงบน แถบเครื่องมือด่วน. คลิกที่ปุ่ม จากนั้นอีเมลในกล่องจดหมายทั้งหมดของบัญชีอีเมลหลายบัญชีจะถูกค้นหาและรวมเข้าด้วยกันดังภาพหน้าจอด้านล่าง:

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
การค้นหาขั้นสูง: VLookup หลายเกณฑ์    VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่    สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์    ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
ชุดเครื่องมือ 15 อันดับแรก12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...

kte แท็บ 201905


แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 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