Outlook имэйлийг Word баримт болгон хөрвүүлэх 2 үр дүнтэй арга

Хэрэв та Outlook имэйлийг word баримт болгон хадгалах эсвэл хөрвүүлэхийг хүсвэл энэ нийтлэлд танилцуулсан 2 аргыг ашиглаж болно.

Outlook нь Outlook имэйлийг word баримт болгон хадгалах, хөрвүүлэх ямар ч үндсэн функцийг санал болгодоггүй. Тиймээс, хэрэв та зорилгодоо хүрэхийг хүсч байвал нэмэлт хүчин чармайлт гаргах хэрэгтэй. Энд бид танд 2 хурдан аргыг зааж өгөх болно. Нэг нь "Хадгалах" функцийг ухаалаг ашиглах явдал юм. Нөгөө нь Outlook VBA-г болгоомжтой ашиглах явдал юм. Тэдгээрийг дэлгэрэнгүй үзэхийн тулд уншина уу.

Арга 1: "Хадгалах" функцийг ашиглана уу

1. Эхлэхийн тулд Outlook програмаа ажиллуулна уу.
2. Дараа нь и-мэйл дээр санал тавь.
3. Дараа нь "Файл" цэс рүү очоод "Хадгалах" сонголтыг сонгоно уу.
4. Дараа нь гарч ирэх харилцах цонхноос очих фолдерыг сонгоод "Төрөл болгон хадгалах" талбарт "Зөвхөн текст" -ийг сонгоно уу.
5. "Хадгалах" товчийг дарсны дараа та Microsoft Word програмаа нээж болно.
6. MS Word дээр "Файл" цэс рүү очоод "Нээлттэй" гэснийг сонгоно уу.
7. "Нээлттэй" харилцах цонхноос "Файлын нэр" мөрөнд "Бүх файлууд" -ыг сонгоод өмнө нь хадгалсан текст файлыг сонго.
8. "Нээх" дээр товшсоны дараа файлын текстийн имэйл Word дээр нээгдэнэ.
9. Дараа нь та "Файл"> "Хадгалах" гэснийг сонгож болно.
10. Эцэст нь "Хадгалах" харилцах цонхноос "Хадгалах төрөл" хэсэгт "Үг баримт бичиг" -ийг сонгоод "Хадгалах" дээр дарна уу.

Арга 2: Outlook VBA ашиглах

1. Эхний ээлжинд Outlook дээрх "Alt + F11" товчийг дарна уу.
2. Дараа нь гарч ирэх Outlook VBA засварлагч цонхонд шинэ модулийг нээнэ үү.
3. Дараа нь дараах VBA кодыг хуулж оруулна уу.

Sub ConvertEmailtoWordDocument()
    Dim objMail As Outlook.MailItem
    Dim strMessage As String
    Dim objWordApp As Word.Application
    Dim objWordDocument As Word.Document
    Dim objWordRange As Word.Range
    Dim strFilePath, strFileName As String
 
    Select Case Application.ActiveWindow.Class
           Case olExplorer
                Set objMail = ActiveExplorer.Selection.Item(1)
           Case olInspector
                Set objMail = ActiveInspector.CurrentItem
    End Select
 
    strMessage = "From: " & objMail.SenderName & vbCrLf & "Sent: " & objMail.SentOn & vbCrLf & "Subject: " & objMail.Subject & vbCrLf & vbCrLf & objMail.Body
 
    'create a word document
    Set objWordApp = CreateObject("Word.Application")
    Set objWordDocument = objWordApp.Documents.Add
    objWordDocument.Activate
    Set objWordRange = objWordDocument.Range(0, 0)
    'insert the email information to the document
    objWordRange.Text = strMessage
 
    'change the email contents' format
    With objWordRange.Font
         .Name = "Cambria"
         .Color = wdColorBlack
         .Size = 12
    End With
 
    'show the word document
    objWordApp.Visible = True
    objWordDocument.ActiveWindow.Visible = True
End Sub

4. Дараа нь шинэ VBA төслийг Quick Access Toolbar-д нэмнэ үү.
5. Үүний дараа имэйлээ сонгоод Quick Access Toolbar дээрх макро товчийг дарна уу.
6. Нэг дор имэйлийн агуулга бүхий Word баримт бичиг гарч ирнэ.
7. Эцэст нь та шинэ гарч ирэх Word баримтыг ердийнхөөрөө хадгалах боломжтой.

Ядаргаатай Outlook асуудлуудыг үр дүнтэй устга

Outlook нь алдаа, эвдрэлд өртөмтгий байдаг тул та Outlook-ийн мэдээллээ хамгаалахад илүү их хүчин чармайлт гаргах хэрэгтэй. Жишээлбэл, та Outlook өгөгдлөө тогтмол нөөцлөх хэрэгтэй. Цаашилбал, нэр хүндтэй хүнийг барьж авах нь ухаалаг хэрэг юм Outlook сэргээх хэрэгсэл, гэх мэт DataNumen Outlook Repair, энэ нь хэзээ нэгэн цагт хэрэг болох нь гарцаагүй.

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

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