วิธีการเปลี่ยนไฟล์เป็นรูปแบบสำหรับผู้ติดต่อทั้งหมดใน Outlook

โดยทั่วไปไฟล์ผู้ติดต่อจะแสดงเป็นนามสกุลนามสกุลใน Outlook แต่คุณจะเปลี่ยนไฟล์ผู้ติดต่อเป็นรูปแบบเป็น บริษัท หรือลำดับอื่น ๆ ได้อย่างไรตามภาพด้านล่างนี้ คำสั่ง "ไฟล์เป็น" ที่เป็นค่าเริ่มต้นของตัวเลือกสามารถใช้ได้กับผู้ติดต่อใหม่เท่านั้น แต่จะใช้กับผู้ติดต่อใหม่ไม่ได้ ที่นี่ฉันแนะนำรหัส VBA ให้กับไฟล์การเปลี่ยนแปลงแบทช์เป็นรูปแบบสำหรับผู้ติดต่อที่มีอยู่ทั้งหมดใน Outlook

ไฟล์เปลี่ยนแบทช์สำหรับผู้ติดต่อทั้งหมดด้วย VBA

ไฟล์เปลี่ยนแบทช์สำหรับผู้ติดต่อทั้งหมดด้วย VBA

1. เลือกรายชื่อที่คุณต้องการเปลี่ยนไฟล์เป็นกด Alt + F11 คีย์เพื่อเปิดใช้งานไฟล์ Microsoft Visual Basic for Applications หน้าต่าง

2. ดับเบิลคลิกที่ ThisOutlookSession in Project-Project1 บานหน้าต่างและคัดลอกและวางโค้ดด้านล่างลงในสคริปต์เปล่า

VBA: เปลี่ยนไฟล์เป็น

Sub ChangeFileAsforContracts()
'UpdatebyExtendoffice20180404
Dim xSelItems As Object
Dim xItem As Object
Dim xContact As ContactItem
Dim xFileAs As String
On Error Resume Next
If Outlook.Application.ActiveExplorer.CurrentFolder.DefaultItemType <> olContactItem Then
    MsgBox "Please select the contact folder first", vbInformation + vbOKOnly, "Kutools for Outlook"
    Exit Sub
End If
Set xSelItem = Outlook.ActiveExplorer.Selection
For Each xItem In xSelItem
    If xItem.Class = olContact Then
        Set xContact = xItem
        With xContact
            If .CompanyName = "" Then
                xFileAs = .FullName
            Else
                xFileAs = .CompanyName
            End If
            .FileAs = xFileAs
            .Save
        End With
    End If
Next
End Sub

3 กด F5 เพื่อเรียกใช้โค้ด จากนั้นผู้ติดต่อที่เลือกทั้งหมดจะถูกเปลี่ยนไฟล์เป็นบริษัท

หมายเหตุ

1. ในโค้ด คุณสามารถเปลี่ยนแปลงได้ CompanyName ไปยังฟิลด์อื่นๆ ที่คุณต้องการแสดงไฟล์เป็น

2. หากไม่มีข้อมูลบริษัทก็จะแสดงชื่อเต็ม

---

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

Kutools สำหรับ Outlook - คุณสมบัติอันทรงพลังมากกว่า 100 รายการเพื่อเติมพลังให้กับ Outlook ของคุณ

🤖 ผู้ช่วยจดหมาย AI: ส่งอีเมลระดับมืออาชีพทันทีด้วยเวทมนตร์ AI คลิกเพียงครั้งเดียวเพื่อตอบกลับอย่างชาญฉลาด น้ำเสียงที่สมบูรณ์แบบ การเรียนรู้หลายภาษา เปลี่ยนรูปแบบการส่งอีเมลอย่างง่ายดาย! ...

📧 การทำงานอัตโนมัติของอีเมล: ไม่อยู่ที่สำนักงาน (ใช้ได้กับ POP และ IMAP)  /  กำหนดการส่งอีเมล  /  Auto CC/BCC ตามกฎเมื่อส่งอีเมล  /  ส่งต่ออัตโนมัติ (กฎขั้นสูง)   /  เพิ่มคำทักทายอัตโนมัติ   /  แบ่งอีเมลผู้รับหลายรายออกเป็นข้อความส่วนตัวโดยอัตโนมัติ ...

📨 การจัดการอีเมล์: เรียกคืนอีเมลได้อย่างง่ายดาย  /  บล็อกอีเมลหลอกลวงตามหัวเรื่องและอื่นๆ  /  ลบอีเมลที่ซ้ำกัน  /  การค้นหาขั้นสูง  /  รวมโฟลเดอร์ ...

📁 ไฟล์แนบโปร: บันทึกแบทช์  /  การแยกแบทช์  /  การบีบอัดแบบแบตช์  /  บันทึกอัตโนมัติ   /  ถอดอัตโนมัติ  /  บีบอัดอัตโนมัติ ...

🌟 อินเตอร์เฟซเมจิก: 😊อีโมจิที่สวยและเจ๋งยิ่งขึ้น   /  เพิ่มประสิทธิภาพการทำงาน Outlook ของคุณด้วยมุมมองแบบแท็บ  /  ลดขนาด Outlook แทนที่จะปิด ...

???? เพียงคลิกเดียวสิ่งมหัศจรรย์: ตอบกลับทั้งหมดด้วยไฟล์แนบที่เข้ามา  /   อีเมลต่อต้านฟิชชิ่ง  /  🕘 แสดงโซนเวลาของผู้ส่ง ...

👩🏼‍🤝‍👩🏻 รายชื่อและปฏิทิน: แบทช์เพิ่มผู้ติดต่อจากอีเมลที่เลือก  /  แบ่งกลุ่มผู้ติดต่อเป็นกลุ่มแต่ละกลุ่ม  /  ลบการแจ้งเตือนวันเกิด ...

เกิน คุณสมบัติ 100 รอการสำรวจของคุณ! คลิกที่นี่เพื่อค้นพบเพิ่มเติม

อ่านเพิ่มเติม       ดาวน์โหลดฟรี      การซื้อ