Олон Outlook имэйлийн хавсралтын жагсаалтыг хэвлэх 2 хурдан арга

Заримдаа та олон имэйлийн хавсралтын жагсаалтыг гаргаж, хэвлэх хэрэгтэй болно. Энэ нийтлэлд бид танд үүнийг олж авах 2 аргыг заах болно.

Хэрэв танд лавлагаа авахын тулд олон хавсралттай хэд хэдэн имэйл ирсэн бол эдгээр хавсралтын нэрийг хэвлэхийг хүсч магадгүй юм. Энэ нөхцөлд та үүнийг бөөнөөр нь яаж авах вэ? Үүний дараа бид зөвхөн олон Outlook имэйлийн хавсралтын жагсаалтыг хурдан хэвлэх 2 аргыг заах болно.

Арга 1: Хавсралт жагсаалтыг баялаг текст хэлбэрээр хэвлэх, хуулах

1. Хамгийн эхэнд Outlook имэйлийг нээнэ үү.
2. Дараа нь Зурвас цонхонд "Үйлдэл" дээр дарж "Зурвас засах" гэснийг сонгоно уу.
3. Дараа нь "Текст форматлах" таб руу шилжиж, "Баян текст" форматыг сонгоно уу.
4. Нэгэнт имэйлийн хавсралтыг биед шилжүүлж байгааг харж болно.
5. Үүний дараа "Зурвас" таб дээрх "Хариулах" бүлэгт байгаа "Хариулах" товчийг дарна уу.
6. Дараагийн мэйлд хавсралтын жагсаалтыг доорх скриншотын нэгэн адил үндсэн хэсэгт оруулсан болно.
7. Одоо та хавсралтын жагсаалтыг шинэ имэйл рүү хуулж болно.
8. Дараа нь бусад имэйлийн хавсралтын жагсаалтыг шинэ имэйлд хуулахын тулд энэ аргыг ашиглаарай.
9. Эцэст нь та энэ шинэ захиаг ердийн хэвлэх боломжтой.

Арга 2: Outlook VBA-ээр хавсралтын жагсаалтыг хэвлэх

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

Sub PrintAttachmentListsOfManyEmails()
    Dim objSelection As Outlook.Selection
    Dim objMail As Outlook.MailItem
    Dim objAttachment As Outlook.Attachment
    Dim objTempMail As Outlook.MailItem
    
    'Get the selected emails
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
 
    If Not (objSelection Is Nothing) Then
       'Input the attachment lists into a temp mail
       Set objTempMail = Outlook.Application.CreateItem(olMailItem)
 
       For i = 1 To objSelection.Count
           If objSelection(i).Class = olMail Then
              Set objMail = objSelection(i)
              If objMail.Attachments.Count > 0 Then
 
                 objTempMail.Body = objTempMail.Body & vbCr & "-------------------------------------------------------------------------------------------------------------" & vbCr & vbCr & i & ". " & objMail.Subject & vbCr & vbCr & "Attachment List:" & vbCr
 
                 For n = 1 To objMail.Attachments.Count
                     Set objAttachment = objMail.Attachments(n)
                     objTempMail.Body = objTempMail.Body & vbCr & "<<" & objAttachment.FileName & " Size: " & Round(objAttachment.Size / 1024, 1) & " KB>>"
                 Next
              End If
           End If
       Next

       'Print the temp mail
       objTempMail.PrintOut
     End If
End Sub

3. Үүний дараа энэ макроыг Quick Access Toolbar дээр нийтлэлээс иш татан нэмнэ үү.Таны Outlook дээр VBA кодыг хэрхэн ажиллуулах вэ".
4. Эцэст нь энэ макрог туршиж үзээрэй.

• Эхлээд хэд хэдэн имэйл сонгоно уу.
• Дараа нь Quick Access Toolbar дээрх макро товчийг дарна уу.
• Эдгээр имэйлийн хавсралтын жагсаалтыг нэг дор хэвлэсэн байх ёстой.

Зөвлөгөө өгөх Outlook засах хэрэгсэлд очиж үзээрэй

Outlook файлын эвдрэлтэй тулгарах үед таны гарт саяхан гарсан Outlook өгөгдлийн нөөц байгаа хамгийн сайн мэдээ байх ёстой. Энэ нь танд төвөгтэй Outlook файлын засварыг арилгах боломжийг олгоно. Гэхдээ заримдаа нөөцлөлтийг сэргээж чаддаггүй. Тэр үед та илүү одтой, мэргэжлийн засах хэрэгсэлд хандах хэрэгтэй DataNumen Outlook Repair. Энэ нь засах боломжтой авлига авсан PST хэдэн минутын дотор гардаг.

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

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