หากคุณอยู่ในอุตสาหกรรมที่ได้รับอีเมลนับไม่ถ้วนทุกวัน คุณอาจได้รับอีเมลจำนวนมากพร้อมไฟล์แนบหลายฉบับ การใช้วิธีแยกไฟล์แนบด้วยตนเองอาจใช้เวลานานหากมีไฟล์ให้ดาวน์โหลดจำนวนมาก โชคดีที่การบันทึกไฟล์แนบอีเมลหลายไฟล์พร้อมกันโดยใช้ Microsoft Outlook เป็นเรื่องง่าย
ในบทช่วยสอนนี้ เราจะแสดงวิธีดาวน์โหลดไฟล์แนบทั้งหมดจาก Outlook
วิธีดาวน์โหลดไฟล์แนบอีเมล Microsoft Outlook ทั้งหมดพร้อมกันบน Windows
หากต้องการดาวน์โหลดไฟล์แนบทั้งหมดพร้อมกันโดยใช้แอป Windows Microsoft Outlook ให้ทำดังนี้:
- เปิด Outlook และลงชื่อเข้าใช้โปรไฟล์ Outlook ของคุณ
- เลือกอีเมลพร้อมไฟล์แนบ Outlook ที่คุณต้องการ
- คลิกขวาที่ไฟล์แนบใดๆ และเลือกบันทึกไฟล์แนบทั้งหมดจากเมนูแบบเลื่อนลง หากคุณต้องการบันทึกเพียงไฟล์เดียว ให้เลือกบันทึกเป็น
- ในกล่องโต้ตอบใหม่ ให้กดปุ่ม CTRL บนแป้นพิมพ์ของคุณค้างไว้ และเลือกไฟล์แนบทั้งหมดที่คุณต้องการดาวน์โหลด คลิกตกลง
- เลือกตำแหน่งที่คุณต้องการบันทึกไฟล์แล้วกดปุ่ม OK
วิธีดาวน์โหลดไฟล์แนบอีเมล Microsoft Outlook ทั้งหมดพร้อมกันบน Mac
ต่อไปนี้เป็นวิธีดาวน์โหลดไฟล์แนบทั้งหมดโดยใช้ Outlook สำหรับ Mac:
- เปิดแอปพลิเคชัน MS Outlook
- เลือกข้อความอีเมลที่มีไฟล์แนบของคุณ
- คลิกที่ไฟล์แนบและเลือกดาวน์โหลดทั้งหมด
- เลือกตำแหน่งที่คุณต้องการบันทึกไฟล์แนบของคุณและเลือกเลือก
วิธีดาวน์โหลดไฟล์แนบ Outlook หลายไฟล์จากอีเมลหลายฉบับ
นอกจากนี้ยังสามารถดาวน์โหลดไฟล์แนบหลายไฟล์จากอีเมลหลายฉบับพร้อมกันได้ โดยทำดังนี้:
ใช้โค้ด VBA
หากคุณใช้ Outlook 2019, 2016, 2013, 2010, 2007 หรือ 2003 คุณสามารถใช้ตัวแก้ไข VBA เพื่อดาวน์โหลดไฟล์แนบหลายไฟล์จากอีเมลหลายฉบับได้
- เปิดโฟลเดอร์เอกสารของคุณและสร้างโฟลเดอร์ใหม่ชื่อ “ไฟล์แนบ” นี่คือที่ที่ไฟล์แนบของคุณจะถูกดาวน์โหลดไป
- เปิด Microsoft Outlook
- กดปุ่ม Alt และ F11 บนแป้นพิมพ์เพื่อเปิดโปรแกรมแก้ไข VBA
- คลิกขวาที่วัตถุ Microsoft Outlook> แทรก> แทรกโมดูล
- คัดลอกโค้ดต่อไปนี้ลงในโปรแกรมแก้ไขแล้วกด Enter:
Dim GCount เป็นจำนวนเต็ม
หรี่ GFilepath เป็นสตริง
บันทึกย่อยสาธารณะ()
'อัปเดต 20200821
หรี่ xMailItem เป็น Outlook.MailItem
หรี่ xAttachments เป็น Outlook.Attachments
หรี่ xSelection เป็น Outlook.Selection
หรี่ฉันให้นานที่สุด
หรี่ xAttCount นานที่สุด
หรี่ xFilePath เป็นสตริง, xFolderPath เป็นสตริง, xSaveFiles เป็นสตริง
เมื่อเกิดข้อผิดพลาด ดำเนินการต่อถัดไป
xFolderPath =CreateObject(“WScript.Shell”).SpecialFolders(16)
ตั้งค่า xSelection =Outlook.Application.ActiveExplorer.Selection
xFolderPath =xFolderPath &“\ไฟล์แนบ\”
ถ้า VBA.Dir(xFolderPath, vbDirectory) =vbNullString จากนั้น
VBA.MkDir xFolderPath
สิ้นสุดถ้า
GFilepath =“”
สำหรับแต่ละรายการ xMailItem ใน xSelection
ตั้งค่า xAttachments =xMailItem.Attachments
xAttCount =xAttachments.Count
xSaveFiles =“”
ถ้า xAttCount> 0 แล้ว
สำหรับ i =xAttCount ถึง 1 ขั้นตอน -1
GCount =0
xFilePath =xFolderPath &xAttachments.Item(i).ชื่อไฟล์
GFilepath =xFilePath
xFilePath =FileRename(xFilePath)
ถ้า IsEmbeddedAttachment(xAttachments.Item(i)) =False จากนั้น
xAttachments.Item(i).SaveAsFile xFilePath
ถ้า xMailItem.BodyFormat <> olFormatHTML จากนั้น
xSaveFiles =xSaveFiles &vbCrLf &“<ข้อผิดพลาด! การอ้างอิงไฮเปอร์ลิงก์ไม่ถูกต้อง>”
อย่างอื่น
xSaveFiles =xSaveFiles &“
” &“” &xFilePath &“
”
สิ้นสุดถ้า
สิ้นสุดถ้า
ถัดไป
สิ้นสุดถ้า
ถัดไป
ตั้งค่า xAttachments =ไม่มีสิ่งใด
ตั้งค่า xMailItem =ไม่มีสิ่งใด
ตั้งค่า xSelection =ไม่มีสิ่งใด
สิ้นสุดย่อย
ฟังก์ชัน FileRename(FilePath As String) As String
Dim xPath เป็นสตริง
หรี่ xFso เป็น FileSystemObject
เมื่อเกิดข้อผิดพลาด ดำเนินการต่อถัดไป
ตั้งค่า xFso =CreateObject(“Scripting.FileSystemObject”)
xPath =เส้นทางไฟล์
เปลี่ยนชื่อไฟล์ =xPath
ถ้า xFso.FileExists(xPath) จากนั้น
GCount =GCount + 1
xPath =xFso.GetParentFolderName(GFilepath) &“\” &xFso.GetBaseName(GFilepath) &” ” &GCount &“” + xFso.GetExtensionName(GFilepath)
FileRename =FileRename(xPath)
สิ้นสุดถ้า
xFso =ไม่มีอะไร
สิ้นสุดฟังก์ชัน
ฟังก์ชัน IsEmbeddedAttachment (แนบเป็นไฟล์แนบ)
Dim xItem เป็น MailItem
หรี่ xCid เป็นสตริง
Dim xID เป็นสตริง
Dim xHtml เป็นสตริง
เมื่อเกิดข้อผิดพลาด ดำเนินการต่อถัดไป
IsEmbeddedAttachment =เท็จ
ตั้งค่า xItem =Attach.Parent
ถ้า xItem.BodyFormat <> olFormatHTML จากนั้นออกจากฟังก์ชัน
xCid =“”
xCid =Attach.PropertyAccessor.GetProperty(“http://schemas.microsoft.com/mapi/proptag/0x3712001F”)
ถ้า xCid <> “” จากนั้น
xHtml =xItem.HTMLBody
xID =“ซิด:” &xซิด
ถ้า InStr(xHtml, xID)> 0 จากนั้น
IsEmbeddedAttachment =จริง
สิ้นสุดถ้า
สิ้นสุดถ้า
สิ้นสุดฟังก์ชัน
หมายเหตุ:คุณสามารถคัดลอกโค้ดต้นฉบับด้านบนได้จาก Extended Office และวางลงในโปรแกรมแก้ไข
- กด F5 เพื่อเรียกใช้สคริปต์ คุณอาจได้รับหน้าต่างป๊อปอัปแจ้งให้คุณอนุญาตการดำเนินการ
การใช้เครื่องมือภายนอก
หากคุณใช้ Outlook เวอร์ชันอื่น ต้องการดาวน์โหลดไฟล์ประเภทอื่นที่ไม่ใช่ PST หรือพบว่าวิธี VBA ยุ่งยาก คุณสามารถดาวน์โหลดเครื่องมือที่สามารถช่วยคุณดาวน์โหลดไฟล์แนบ Outlook หลายไฟล์พร้อมกันได้
แอปต่างๆ เช่น Outlook Attachment Extractor มีฟังก์ชันในการบันทึกไฟล์แนบไม่เพียงแต่จากไฟล์ PST เท่านั้น แต่ยังมาจากไฟล์รูปแบบอื่นๆ เช่น ไฟล์ OST, BAK, MSG, OLK และ OLM อีกด้วย คุณยังสามารถกำหนดค่าแอปให้กรองไฟล์แนบตามขนาดไฟล์ วันที่ หรือผู้ส่งได้
วิธีดาวน์โหลดไฟล์แนบทั้งหมดจากไฟล์ที่เสียหาย
หากคุณไม่สามารถเปิด ดู หรือบันทึกไฟล์แนบใน Outlook ได้ ไฟล์ Microsoft Outlook PST อาจเสียหายหรือเสียหาย คุณสามารถซ่อมแซมไฟล์ PST เพื่อดึงข้อมูลเอกสารแนบโดยใช้เครื่องมือ เช่น แอปพลิเคชัน SCANPST.exe
หากต้องการใช้เครื่องมือนี้ ให้ปิด Outlook และนำทางไปยังตำแหน่งใดตำแหน่งหนึ่งต่อไปนี้ ขึ้นอยู่กับเวอร์ชันของ Outlook:
- Outlook 2019:ไฟล์ C:\Program (x86)\Microsoft Office\root\Office16
- Outlook 2016:ไฟล์ C:\Program (x86)\Microsoft Office\root\Office16
- Outlook 2013:ไฟล์ C:\Program (x86)\Microsoft Office\Office15
- Outlook 2010:ไฟล์ C:\Program (x86)\Microsoft Office\Office14
- Outlook 2007:ไฟล์ C:\Program (x86)\Microsoft Office\Office12
จากนั้นดับเบิลคลิก SCANPST.EXE 
เลือกเรียกดู ค้นหาไฟล์ข้อมูล Outlook ที่คุณต้องการสแกน แล้วกดเริ่ม
หากเครื่องมือพบข้อผิดพลาด ให้เลือกซ่อมแซมเพื่อพยายามแก้ไข เมื่อเสร็จแล้ว ให้รีสตาร์ท Outlook และตรวจสอบว่าตอนนี้ใช้งานได้หรือไม่
ปรับปรุงกิจกรรมอีเมลของคุณ
การดาวน์โหลดไฟล์หลายไฟล์จาก Outlook เป็นเรื่องง่าย และคุณยังสามารถดาวน์โหลดไฟล์หลายไฟล์จากอีเมลหลายฉบับพร้อมกันได้ หากคุณพบว่าวิธีการที่มีอยู่ใน Outlook ยากเกินไป คุณสามารถดาวน์โหลดเครื่องมือ เช่น Outlook Attachment Extractor เพื่อช่วยเหลือคุณได้
