คุกกี้ช่วยให้เราสามารถนำเสนอบริการของเรา โดยการใช้บริการของเราคุณยินยอมที่จะใช้งานของเราคุกกี้
เคล็ดลับ: ภาษาอื่น ๆ ได้รับการแปลโดย Google คุณสามารถเยี่ยมชม English รุ่นของลิงก์นี้
เข้าสู่ระบบ
x
or
x
x
สมัครสมาชิก
x

or

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

คุณเคยพยายามเปิดโฟลเดอร์ Outlook เฉพาะจากไฟล์ Excel เช่นการเปิดโฟลเดอร์ Inbox โฟลเดอร์รายชื่อหรือโฟลเดอร์อื่น ๆ หรือไม่? บทความนี้ผมจะพูดถึงวิธีการเปิดโฟลเดอร์ 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 สำหรับแอ็พพลิเคชัน หน้าต่างใน popped ออก อ้างอิง Project1 กล่องโต้ตอบตรวจสอบ ไลบรารีวัตถุ Microsoft Outlook ตัวเลือกจาก การอ้างอิงที่มีอยู่ กล่องรายการดูภาพหน้าจอ:

doc เปิดโฟลเดอร์ Outlook 1

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



เครื่องมือเพิ่มประสิทธิภาพที่แนะนำ

แท็บ Office

gold star1 นำแท็บที่มีประโยชน์ไปยัง Excel และซอฟต์แวร์ Office อื่น ๆ เช่นเดียวกับ Chrome, Firefox และ Internet Explorer ใหม่

Kutools สำหรับ Excel

gold star1 น่าทึ่ง! เพิ่มประสิทธิภาพการทำงานของคุณในอีก 5 นาที ไม่จำเป็นต้องมีทักษะพิเศษประหยัดสองชั่วโมงทุกวัน!

gold star1 300 คุณสมบัติใหม่สำหรับ Excel, Make Excel ง่ายมากและมีประสิทธิภาพ:

  • ผสานเซลล์ / แถว / คอลัมน์โดยไม่สูญเสียข้อมูล
  • รวมและรวมแผ่นงานหลายแผ่นและสมุดงาน
  • เปรียบเทียบช่วง, คัดลอกหลายช่วง, แปลงข้อความเป็นวันที่, หน่วยและการแปลงสกุลเงิน
  • นับตามสี, เพจย่อยย่อย, การเรียงลำดับขั้นสูงและตัวกรอง Super,
  • เพิ่มเติมเลือก / แทรก / ลบ / ข้อความ / รูปแบบ / ลิงก์ / ความคิดเห็น / เวิร์คบุ๊ค / แผ่นงานเครื่องมือ ...

ภาพหน้าจอของ Kutools for Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.