Outlook имэйлийн хэсгийг а-г хэрхэн хурдан экспортлох вэ PDF Файлын

Одоо хуваалцах:

Хэрэв та имэйлийг бүхэлд нь биш харин Outlook имэйлийн хэсгийг экспортлохыг хүсвэл PDF файл, та энэ нийтлэлийг уншиж болно. VBA кодоор үүнийг хэрэгжүүлэхэд бид танд зааварчилгаа өгөх болно.

Миний өмнөх нийтлэлүүдээс “Outlook имэйлийг хэрхэн яаж хадгалах вэ? PDF Файлын"Болон"Олон Outlook имэйлийг дангаар нь яаж хурдан экспортлох вэ PDF Файлын”Гэж та имэйлийг бүхэлд нь экспортлох аргуудыг сурч болно PDF файл. Гэсэн хэдий ч, заримдаа таны хүсч буй зүйл бол имэйлийн хэсгийг a хэлбэрээр экспортлох явдал юм PDF файл. Тэр үед та дараахь VBA кодыг ашиглаж үүнийг хэрэгжүүлж болно. Хэрэв та VBA-г хэрхэн ашиглахаа бүрэн мэдэхгүй бол нийтлэлийг үзнэ үү - “Таны Outlook дээр VBA кодыг хэрхэн ажиллуулах вэ”Гэсэн үг.

Outlook имэйлийн хэсгийг а-г хурдан экспортлох PDF Файлын

И-мэйлийн хэсгийг a хэлбэрээр экспортлох PDF Файлын

  1. Эхлээд Outlook програмаа ажиллуулна уу.
  2. Дараа нь Outlook VBA редакторт “Alt + F11” товчлолоор хандаарай.
  3. Дараа нь энэ шинэ цонхонд ашиглагдаагүй модулийг нээнэ үү.
  4. Дараа нь дараахь VBA кодыг хуулж аваад энэ модуль дээр буулгана уу.
Sub ExportSelectionAsPDF()
    Dim objMail As Outlook.MailItem
    Dim objMailDocument As Word.Document
    Dim objDocSelection As Word.Selection
    Dim objWordApp As Word.Application
    Dim objTempDocument As Word.Document
    Dim strPDF As String
 
    'Get the currently opened email
    Set objMail = Outlook.Application.ActiveInspector.CurrentItem
 
    If Not objMail Is Nothing Then
       'Copy the current selection
       Set objMailDocument = objMail.GetInspector.WordEditor
       Set objDocSelection = objMailDocument.Application.Selection
       objDocSelection.Copy
 
       'Paste the selection into a new Word document
       Set objWordApp = CreateObject("Word.Application")
       Set objTempDocument = objWordApp.Documents.Add
       objWordApp.Visible = True
       objTempDocument.Activate
       objWordApp.Selection.EndKey wdStory
       objWordApp.Selection.PasteAndFormat wdPasteDefault
 
       'Export the document as a PDF file
       'Change the path as per your needs
       strPDF = "E:\" & objMail.Subject & " (Selection).pdf"
       objTempDocument.ExportAsFixedFormat strPDF, wdExportFormatPDF

       objTempDocument.Close False
       objWordApp.Quit
    End If
End Sub

VBA код - Имэйлийн хэсгийг a хэлбэрээр экспортлох PDF Файлын

  1. Үүний дараа та шинэ макро зурвасын цонхны Quick Access Toolbar дээр нэмэх хэрэгтэй.
  2. Эцэст нь та буудаж болно:
  • Эхлээд имэйл нээнэ үү.
  • Дараа нь экспортлохыг хүссэн агуулгаа сонгоно уу.
  • Дараа нь Quick Access Toolbar дээрх макро товчийг дарна уу.Имэйлийн хэсгийг сонгоно уу
  • Нэгэнт макро ажиллах болно.
  • Макро дуусахад та өмнө нь тодорхойлсон локал хавтас руу орж шинэ хавтас харах боломжтой PDF файл.
  • Үүнийг нээгээд үзэхэд дараахь дэлгэцийн агшин шиг харагдаж байна.Экспортолсон PDF Файлын

Төлөвлөлтийг сүйтгэсний дараа үр дүнтэй арга хэмжээ авах

Хэдийгээр олон тооны сайн функцээр сайрхаж байгаа ч Outlook нь гэмтлээс хамгаалах чадваргүй хэвээр байна. Чухамдаа вирус, хортой програм, програм хангамжийн алдаа, техник хангамжийн асуудал гэх мэт янз бүрийн хүчин зүйлээс болж авлигад өртөмтгий байдаг. Энэ хувилбарт гэмтсэн Outlook өгөгдлийг аврах, эхлүүлэх зэрэг арга хэмжээ авах нь чухал юм Сканнердах файлыг засах, хамгийн сүүлийн үеийн нөөцлөлтийг шалгах, хүчирхэг, найдвартай PST засварлах хэрэгслийн тусламжийг авах гэх мэт DataNumen Outlook Repair.

Зохиогчийн танилцуулга:

Ширли Жан бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. mdf-ийг засах програм хангамжийн бүтээгдэхүүнийг засах хэтийн төлөв. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com

Одоо хуваалцах:

Тайлбарууд нь хаалттай байна.