2 სწრაფი მეთოდი Outlook-ის მრავალი ელფოსტის დანართების სიების დასაბეჭდად

ზოგჯერ მოგიწევთ რამდენიმე ელ.ფოსტის დანართების სიების ამოღება და დაბეჭდვა. ამ სტატიაში გასწავლით მის მისაღებად 2 მეთოდს.

თუ თქვენ მიიღებთ რამდენიმე ელ.წერილს რამდენიმე დანართით თქვენი მითითებისთვის, შეიძლება დაგჭირდეთ ამ დანართების სახელების ამობეჭდვა. ამ სიტუაციაში, როგორ შეგიძლიათ მიიღოთ ის ნაყარი? ამის შემდეგ, ჩვენ გასწავლით 2 გზას, რათა სწრაფად ამობეჭდოთ დანართების სიები მხოლოდ რამდენიმე Outlook ელფოსტით.

მეთოდი 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. ამის შემდეგ, დაამატეთ ეს მაკრო სწრაფი წვდომის ინსტრუმენტთა პანელში სტატიის მითითებით – ”როგორ გაუშვათ VBA კოდი თქვენს Outlook-ში".
4. საბოლოოდ, სცადეთ ეს მაკრო.

• თავდაპირველად აირჩიეთ რამდენიმე ელ.წერილი.
• შემდეგ დააწკაპუნეთ მაკრო ღილაკზე სწრაფი წვდომის ხელსაწყოთა ზოლში.
• ამ ელფოსტის დანართის სიები ერთდროულად უნდა იყოს დაბეჭდილი.

მიმართეთ საუკეთესო Outlook-ის სარემონტო ინსტრუმენტს

როდესაც Outlook ფაილის დაზიანებას წააწყდებით, საუკეთესო სიახლე უნდა იყოს, რომ ხელთ გაქვთ ბოლო Outlook მონაცემთა სარეზერვო ასლი. ეს საშუალებას მოგცემთ მოშორდეთ Outlook ფაილის რთული გამოსწორებას. მაგრამ, ზოგჯერ სარეზერვო ასლის აღდგენა შეიძლება ვერ მოხერხდეს. ამ დროს, თქვენ უნდა მიმართოთ უფრო ვარსკვლავურ და პროფესიონალურ სარემონტო ხელსაწყოს, როგორიცაა DataNumen Outlook Repair. მას შეუძლია შეკეთება კორუმპირებული PST წუთებში.

ავტორი შესავალი:

შირლი ჟანგი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის მდფ-ის შეკეთება და Outlook სარემონტო პროგრამული პროდუქტები. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად