วิธีเปลี่ยนชื่อไฟล์แนบในหน้าต่าง Outlook โดยไม่บันทึกลงดิสก์

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

บันทึกและเปลี่ยนชื่อไฟล์แนบโดยอัตโนมัติด้วยรหัส VBA ใน Outlook
เปลี่ยนชื่อไฟล์แนบในอีเมลได้อย่างง่ายดายโดยไม่ต้องบันทึกลงดิสก์ด้วย Kutools for Outlook

บันทึกและเปลี่ยนชื่อไฟล์แนบด้วยรหัส VBA ใน Outlook

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

1 ใน เอกสาร สร้างโฟลเดอร์ใหม่ชื่อ Attachments เพื่อบันทึกและเปลี่ยนชื่อไฟล์แนบของอีเมลที่เลือก

2. เลือกอีเมลที่มีไฟล์แนบที่คุณต้องการบันทึกและเปลี่ยนชื่อด้วยวันที่แก้ไข

3 กด อื่น ๆ + F11 คีย์พร้อมกันเพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง. ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูลจากนั้นวางโค้ด VBA ด้านล่างลงในหน้าต่างโมดูล

รหัส VBA: บันทึกไฟล์แนบและเพิ่มวันที่แก้ไขก่อนชื่อไฟล์

Public Sub saveattachmentsadddate()
	Dim itm As Outlook.MailItem
	Dim currentExplorer As Explorer
	Dim Selection As Selection
	Dim objAtt As Outlook.Attachment
	Dim saveFolder As String
	Dim fso As Object
	Dim oldName
	Dim file As String
	Dim DateFormat As String
	Dim newName As String
	Dim enviro As String
	enviro              = CStr(Environ("USERPROFILE"))
	saveFolder          = enviro & "\Documents\Attachments\"
	Set currentExplorer = Application.ActiveExplorer
	Set Selection       = currentExplorer.Selection
	Set fso             = CreateObject("Scripting.FileSystemObject")
	On Error Resume Next
	For Each itm In Selection
		For Each objAtt In itm.Attachments
			file = saveFolder & objAtt.DisplayName
			objAtt.SaveAsFile file
			'Get the file name
			Set oldName  = fso.GetFile(file)
			DateFormat   = Format(oldName.DateLastModified, "yyyy-mm-dd ")
			newName      = DateFormat & objAtt.DisplayName
			oldName.Name = newName
			Set objAtt   = Nothing
		Next
	Next
	Set fso = Nothing
End Sub

4 กด F5 คีย์เพื่อเรียกใช้รหัสและไฟล์แนบในอีเมลที่เลือกจะถูกบันทึกลงในโฟลเดอร์ "\ Documents \ Attachments \" และเพิ่มวันที่แก้ไขล่าสุดของไฟล์แนบเป็นคำนำหน้าชื่อไฟล์แนบดั้งเดิมโดยอัตโนมัติ

หมายเหตุ / รายละเอียดเพิ่มเติม:

เปลี่ยนชื่อไฟล์แนบในอีเมลได้อย่างง่ายดายโดยไม่ต้องบันทึกลงดิสก์ด้วย Kutools for Outlook

ที่นี่ขอแนะนำ เปลี่ยนชื่อไฟล์แนบ คุณลักษณะของ Kutools สำหรับ Outlook. ด้วยคุณสมบัตินี้คุณสามารถเปลี่ยนชื่อไฟล์แนบในหน้าต่าง Outlook ได้โดยตรงโดยไม่ต้องบันทึกลงดิสก์

Kutools สำหรับ Outlook : ด้วยโปรแกรมเสริม Outlook ที่มีประโยชน์มากกว่า 100 รายการ ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ภายใน 60 วัน.

1. หลังจากติดตั้ง Kutools สำหรับ Outlookโปรดเลือกอีเมลที่คุณจะเปลี่ยนชื่อไฟล์แนบจากนั้นคลิก Kutools > เครื่องมือแนบ > เปลี่ยนชื่อทั้งหมด.

2 ใน เปลี่ยนชื่อไฟล์แนบ คุณจะเห็นชื่อไฟล์แนบทั้งหมดของอีเมลที่เลือกอยู่ในไฟล์ Name คอลัมน์. โปรดดับเบิลคลิกที่ชื่อไฟล์แนบเพื่อแก้ไขจากนั้นคลิกที่ไฟล์ OK เพื่อบันทึกการเปลี่ยนแปลง
เคล็ดลับ: คุณสามารถแก้ไขชื่อไฟล์แนบทั้งหมดหรือปรับเปลี่ยนชื่อไฟล์แนบใด ๆ ก็ได้ตามที่คุณต้องการในกล่องโต้ตอบ

จากนั้นไฟล์แนบจะถูกเปลี่ยนชื่อในหน้าต่างอีเมลที่เลือก 

หมายเหตุ: คุณสามารถเปลี่ยนชื่อไฟล์แนบบางไฟล์ได้โดยเลือกในบานหน้าต่างการอ่านคลิก Kutools > ตั้งชื่อใหม่ในกล่องโต้ตอบเปลี่ยนชื่อพิมพ์ชื่อใหม่ในไฟล์ Name จากนั้นคลิกที่ไฟล์ OK ปุ่มเพื่อบันทึก ดูภาพหน้าจอ:

หากคุณต้องการทดลองใช้ยูทิลิตีนี้ฟรีโปรดไปที่ ดาวน์โหลดซอฟต์แวร์ฟรี ก่อนแล้วไปใช้การดำเนินการตามขั้นตอนข้างต้น

บทความที่เกี่ยวข้อง:

• จะบันทึกไฟล์แนบทั้งหมดจากอีเมลหลายฉบับไปยังโฟลเดอร์ใน Outlook ได้อย่างไร
• วิธีเก็บเอกสารแนบเมื่อตอบกลับใน Outlook?
• วิธีลบไฟล์แนบทั้งหมดจากอีเมลใน Outlook

---

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

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

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

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

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

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

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

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

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

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

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