Word баримтаас бүх зургийг Outlook имэйл рүү хуулах 3 хурдан арга

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

Жишээлбэл, та олон зураг агуулсан Word баримт бичгийг дуусгах болно. Дараа нь та Outlook имэйл бичихийн тулд эдгээр зургуудыг баримт бичигт дахин ашиглахыг хүсч байна. Энэ тохиолдолд та Word баримтаас зургуудыг Outlook дахь имэйл рүү хурдан хуулах хурдан шийдлийг хүсэх болно. Энэ шаардлагыг харвал бид танд үүнийг авах 3 аргыг зааж өгөх болно.

Арга 1: Нэг нэгээр нь хуулах

1. Эхлээд Outlook дээр шинэ имэйл үүсгэ.
2. Дараа нь Word баримт бичгийг нээнэ үү.
3. Дараа нь Word баримтаас зургийг сонгоно уу.
4. Үүнийг хуулахын тулд "Ctrl + C" товчийг дарна уу.
5. Үүний дараа Outlook имэйл рүү хандана уу.
6. Эцэст нь хуулсан зургийг буулгахын тулд мессежийн үндсэн хэсэгт "Ctrl + V" товчийг дарна уу.
7. Одоо баримтаас бусад зургуудыг энэ имэйл рүү нэг нэгээр нь хуулахын тулд энэ аргыг ашиглана уу.

Арга 2: Зургийг хадгалах, имэйлд багц оруулах

1. Эхлээд нээсэн Word баримтаас "Файл"> "Хадгалах" хэсэгт очно уу.
2. Дараа нь гарч ирэх харилцах цонхноос очих фолдерыг сонгоод "Хадгалах төрөл" талбараас "Вэб хуудас"-ыг сонгоно уу.
3. Дараа нь "Хадгалах" товчийг дарна уу.
4. Үүний дараа Word програмыг ердийнхөөрөө хаа.
5. Дараа нь шинэ Outlook имэйл үүсгэнэ үү.
6. Зурвасын цонхонд "Оруулах" таб руу шилжиж, "Зураг" товчийг дарна уу.
7. Дараа нь шинэ харилцах цонхонд Word баримтыг вэб хуудас болгон хадгалах газар руу очно уу.
8. Дараа нь "xxx_files" нэртэй хавтсыг нээнэ үү.
9. Дараа нь оруулахыг хүссэн зургуудаа сонгоно уу.
10. Эцэст нь "Insert" товчийг дарна уу.
11. Сонгосон зургуудыг имэйлд оруулсан байгааг та харж болно.

Арга 3: VBA-аар багц хуулбарлах

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

Sub CopyImagesToMail()
    Dim objTempDocument As Word.Document
    Dim objInlineShape As Word.InlineShape
    Dim objShape As Word.Shape
    Dim objOutlookApp As Object
    Dim objMail As Object
    Dim objMailDocument As Word.Document
    Dim objDocSelection As Word.Selection
 
    'Copy the whole document to a new Temp document
    Selection.WholeStory
    Selection.Copy
 
    Set objTempDocument = Word.Documents.Add
    objTempDocument.Application.Selection.PasteAndFormat (wdUseDestinationStylesRecovery)

    For Each objInlineShape In objTempDocument.InlineShapes
        objInlineShape.ConvertToShape
    Next
 
    'Clear text in the Temp document
    With objTempDocument.Content.Find
        .ClearFormatting
        .Replacement.ClearFormatting
        .Text = "[^2-^255]{1,}"
        .Replacement.Text = ""
        .MatchWildcards = True
        .Execute Replace:=wdReplaceAll
    End With
 
    Do While objTempDocument.Shapes.Count > 0
       For Each objShape In objTempDocument.Shapes
           objShape.ConvertToInlineShape
       Next
    Loop
 
    'Copy the images in Temp Document
    objTempDocument.Application.Selection.WholeStory
    objTempDocument.Application.Selection.Copy
 
    On Error Resume Next
    Set objOutlookApp = GetObject(, "Outlook.Application")
    If objOutlookApp Is Nothing Then
       Set objOutlookApp = CreateObject("Outlook.Application")
    End If
 
    'Create a new Outlook email
    Set objMail = objOutlookApp.CreateItem(olMailItem)
    objMail.Display
    Set objMailDocument = objMail.GetInspector.WordEditor
    Set objDocSelection = objMailDocument.Application.Selection
 
    'Paste the copied images into email
    objDocSelection.Collapse Direction:=wdCollapseStart
    objDocSelection.PasteAndFormat (wdUseDestinationStylesRecovery)
 
    objTempDocument.Close False
End Sub

4. Үүний дараа "F5" товчийг дарж энэ макро ажиллуулна.
5. Макро дууссаны дараа та дараах дэлгэцийн агшин гэх мэт Word баримтын бүх зургийг агуулсан шинэ Outlook имэйл авах болно.

Өөрийн хэтийн төлөвийг анхааралтай ажиглаарай

Байнгын хэрэглэгч бүр Outlook дээр янз бүрийн асуудалтай тулгарч магадгүй юм. Үнэнийг хэлэхэд, хэрэв та өөрийн хэтийн төлөвөө анхаарч үзвэл аймшигтай асуудлаас үр дүнтэй зайлсхийх боломжтой. Жишээлбэл, та Outlook-оо үргэлж хааж, үл мэдэгдэх имэйлд итгэхгүй байх хэрэгтэй. Мөн PST гэх мэт шаардлага хангасан засварын хэрэгслийг авах нь ухаалаг хэрэг юм DataNumen Outlook Repair. Энэ нь засах боломжтой авлига авсан PST үйсэн гэх мэт асуудлууд.

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

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