วิธีการแบทช์บันทึกอีเมลฉบับร่างหลายฉบับเป็นเทมเพลต Outlook

แบ่งปันเลย:

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

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

Batch บันทึกอีเมลฉบับร่างหลายฉบับเป็นเทมเพลต Outlook

Batch บันทึกอีเมลฉบับร่างหลายฉบับเป็นเทมเพลต Outlook

  1. ในตอนแรกให้เรียกใช้โปรแกรมแก้ไข Outlook VBA
  2. ในหน้าต่าง“ Microsoft Visual Basic for Applications” ใหม่ให้คัดลอกและวางโค้ด VBA ด้านล่าง
Sub SaveMultipleDraftsAsTemplates()
    Dim objSelection As Outlook.Selection
    Dim i As Long
    Dim strTemplateFolder As String
    Dim objMail As Outlook.MailItem
    Dim strSubject As String
 
    'Get all selected mails
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
 
    If Not (objSelection Is Nothing) Then
       'Get the default folder for saving Outlook Templates
       strTemplateFolder = CStr(Environ("USERPROFILE")) & "\Documents\UserTemplates\"
 
       'Save each mail as template
       For i = objSelection.Count To 1 Step -1
           If objSelection(i).Class = olMail Then
              Set objMail = objSelection(i)
              If objMail.Subject <> "" Then
 
                 'Remove unsupported characters
                 strSubject = objMail.Subject
                 strSubject = Replace(strSubject, "/", " ")
                 strSubject = Replace(strSubject, "\", " ")
                 strSubject = Replace(strSubject, ":", "")
                 strSubject = Replace(strSubject, "?", " ")
                 strSubject = Replace(strSubject, Chr(34), " ")
 
                 objMail.SaveAs strTemplateFolder & strSubject & ".oft", olTemplate
              Else
                 objMail.SaveAs strTemplateFolder & "Template" & i & ".oft", olTemplate
              End If
           End If
       Next
 
       'Open the folder of Templates
       Shell "Explorer.exe" & " " & strTemplateFolder, vbNormalFocus
    End If
End Sub

รหัส VBA - ชุดบันทึกอีเมลฉบับร่างหลายฉบับเป็นเทมเพลต Outlook

  1. หลังจากนั้นเพื่อความสะดวกในภายหลังขอแนะนำให้แนบมาโครนี้เข้ากับแถบเครื่องมือด่วน (QAT) เกี่ยวกับขั้นตอนโดยละเอียดคุณสามารถอ่าน“วิธีเรียกใช้รหัส VBA ใน Outlook ของคุณ"
  2. ท้ายที่สุดคุณสามารถถ่ายภาพได้โดยทำตามขั้นตอนด้านล่างนี้
  • ในตอนแรกให้เลือกอีเมลฉบับร่างที่จะบันทึกเป็นเทมเพลต
  • จากนั้นคลิกปุ่มมาโครใน QATเรียกใช้มาโครบนอีเมลฉบับร่างที่เลือก
  • เมื่อแมโครเสร็จสิ้นโฟลเดอร์ Windows สำหรับบันทึกเทมเพลต Outlook เริ่มต้นจะปรากฏขึ้น คุณจะเห็นว่าเทมเพลตจากอีเมลฉบับร่างที่เลือกอยู่ที่นั่นเทมเพลต Outlook

เครื่องมือซ่อมแซมกล่องขาเข้ายังคงล้มเหลว

เมื่อพูดถึงเครื่องมือแก้ไข Outlook ภายใน - Scanpst ผู้ใช้จำนวนมากจะชื่นชอบ ไม่ต้องสงสัยยูทิลิตี้นี้สามารถแก้ไขปัญหาเล็ก ๆ ส่วนใหญ่ใน Outlook ได้ ถึงกระนั้นมันก็ไม่ได้ไร้ที่ติโดยสิ้นเชิง มันยังคงสามารถล้มเหลวและทำให้เกิดข้อผิดพลาดมากมาย เช่นในกรณีที่รุนแรง ความเสียหายของ Outlookไม่สามารถซ่อมแซมไฟล์ PST ที่ถูกบุกรุกได้ ในสถานการณ์นั้นคุณไม่มี alaternative แต่ต้องใช้เครื่องมือของบุคคลที่สามที่ทรงพลังและยอดเยี่ยมเช่น DataNumen Outlook Repair.

บทนำผู้เขียน:

Shirley Zhang เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ การกู้คืน sql และผลิตภัณฑ์ซอฟต์แวร์ซ่อมแซมแนวโน้ม ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.

แบ่งปันเลย:

ความเห็นถูกปิด