Outlook- ի էլփոստը Word փաստաթղթի վերածելու 2 արդյունավետ մեթոդ

Եթե ​​ցանկանում եք պահպանել կամ փոխել Outlook- ի էլփոստը բառի փաստաթուղթ, կարող եք օգտագործել այս հոդվածում ներկայացված 2 եղանակները:

Outlook- ը չի առաջարկում որևէ հարազատ հատկություն ՝ Outlook էլփոստը որպես բառ փաստաթուղթ պահելու կամ փոխարկելու համար: Հետեւաբար, եթե ցանկանում եք դրան հասնել, ապա պետք է լրացուցիչ ջանքեր գործադրեք: Այստեղ մենք ձեզ կսովորեցնենք 2 արագ մեթոդ: Դրանցից մեկն այն է, որ խելացի օգտագործվի «Պահել» հատկությունը: Մյուսը `Outlook VBA- ի տակտիկորեն օգտագործելը: Խնդրում ենք կարդալ այն մանրամասն ստանալու համար:

Մեթոդ 1. Օգտագործեք «Պահել» հատկությունը

1. Սկսելու համար գործարկեք ձեր Outlook ծրագիրը։
2. Հետո տեղադրեք էլ.
3. Հաջորդ հերթին անցեք «Ֆայլ» ընտրացանկին և ընտրեք «Պահել որպես» տարբերակը:
4. Հետևաբար, ելնող պատուհանի պատուհանում ընտրեք նպատակակետի թղթապանակ և «Պահել որպես տիպ» դաշտում ընտրեք «Միայն տեքստ»:
5. «Պահել» կոճակը սեղմելուց հետո կարող եք բացել ձեր Microsoft Word ծրագիրը:
6. MS Word- ում դիմեք «Ֆայլ» ընտրացանկին և ընտրեք «Բացել»:
7. Բաց երկխոսության պատուհանում «Ֆայլի անուն» տողում ընտրեք «Բոլոր ֆայլերը» և տեղադրեք նախկինում պահպանված տեքստային ֆայլը:
8. «Բացել» կտտացնելուց հետո էլ.փոստի տեքստով նամակը կբացվի բառով:
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 նախագիծը Արագ մատչելիության գործիքագոտում:
5. Դրանից հետո ընտրեք էլ. Փոստ և սեղմեք մակրո կոճակին Արագ մուտքի գործիքագոտում:
6. Միանգամից կցուցադրվի Word փաստաթուղթ, որի մեջ կա էլ. Փոստի պարունակություն:
7. Վերջապես, դուք կարող եք պահպանել նոր ելնող Word փաստաթուղթը, ինչպես միշտ:

Արդյունավետորեն վերացրեք անհանգստացնող հեռանկարների հարցերը

Քանի որ Outlook- ը հակված է սխալների և կոռուպցիայի, դուք պետք է ավելի շատ ջանք գործադրեք ձեր Outlook տվյալների պաշտպանության համար: Օրինակ, դուք պետք է պարբերաբար կրկնօրինակեք ձեր Outlook տվյալների համար: Ավելին, խելամիտ է նվաճել գերակշռողին Outlook- ի վերականգնում գործիք, ինչպես DataNumen Outlook Repair, որն անպայման օգտակար կլինի մի օր:

Հեղինակի ներածություն.

Shirley Zhang- ը տվյալների վերականգման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում SQL Server նորոգում և հեռանկարների նորոգման ծրագրակազմի արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com