วิธีเปิดโฟลเดอร์ Outlook เฉพาะจาก Excel 

คุณเคยพยายามเปิดโฟลเดอร์ Outlook เฉพาะจากไฟล์ Excel เช่นเปิดโฟลเดอร์กล่องขาเข้าโฟลเดอร์ที่ติดต่อหรือโฟลเดอร์อื่น ๆ หรือไม่? บทความนี้ผมจะพูดถึงวิธีการเปิดโฟลเดอร์ Outlook ที่ต้องการจากสมุดงาน Excel?

เปิดโฟลเดอร์ Outlook เฉพาะจากไฟล์ Excel ด้วยรหัส VBA

เปิดโฟลเดอร์ Outlook เฉพาะจากไฟล์ Excel ด้วยรหัส VBA

รหัส VBA ต่อไปนี้สามารถช่วยให้คุณเปิดโฟลเดอร์ Outlook เฉพาะจากแผ่นงาน Excel ได้โปรดทำดังนี้:

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

2. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางมาโครต่อไปนี้ในไฟล์ หน้าต่างโมดูล.

รหัส VBA: เปิดโฟลเดอร์ Outlook เฉพาะจากไฟล์ Excel:

Sub OpenOutlookFolder()
    Dim xOutlookApp As Outlook.Application
    Dim xNameSpace As Outlook.Namespace
    Dim xFolder As Outlook.Folder
    Dim xFolderType As OlDefaultFolders
    On Error Resume Next
    Set xOutlookApp = New Outlook.Application
    Set xNameSpace = xOutlookApp.Session
    Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox)
    xFolder.Display
    Set xFolder = Nothing
    Set xNameSpace = Nothing
    Set xOutlookApp = Nothing
    Exit Sub
End Sub

หมายเหตุ: ในรหัสด้านบนคุณสามารถเปลี่ยนไฟล์ กล่องขาเข้า ใน ตั้งค่า xFolder = xNameSpace.GetDefaultFolder (olFolderInbox) สคริปต์ไปยังชื่อโฟลเดอร์อื่นที่คุณต้องการเปิด

3. จากนั้นคลิก เครื่องมือ > อ้างอิง ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน ในหน้าต่างที่โผล่ออกมา เอกสารอ้างอิง - โครงการ 1 กล่องโต้ตอบตรวจสอบ ไลบรารีวัตถุของ Microsoft Outlook ตัวเลือกจาก อ้างอิงที่มีอยู่ กล่องรายการดูภาพหน้าจอ:

4. จากนั้นคลิก OK เพื่อปิดกล่องโต้ตอบและกด F5 เพื่อเรียกใช้รหัสนี้และโฟลเดอร์ Outlook ที่ระบุจะเปิดขึ้นทันที