2 бързи метода за отпечатване на списъците с прикачени файлове на множество имейли на Outlook

Понякога ще трябва да извлечете и отпечатате списъците с прикачени файлове на множество имейли. В тази статия ще ви научим на 2 метода да го получите.

Ако получите няколко имейла с множество прикачени файлове за вашите справки, може да искате да отпечатате имената на тези прикачени файлове. При това положение, как можете да го получите в насипно състояние? След това ще ви научим на 2 начина за бързо отпечатване на списъците с прикачени файлове само на множество имейли на Outlook.

Метод 1: Отпечатване и копиране на списък с прикачени файлове в обогатен текстов формат

1. В самото начало отворете имейл в Outlook.
2. След това в прозореца за съобщения щракнете върху „Действия“ и изберете „Редактиране на съобщение“.
3. След това отворете раздела „Форматиране на текст“, от който изберете формат „Обогатен текст“.
4. Веднага можете да видите, че прикачените файлове към имейла са преместени в тялото.
5. След това щракнете върху бутона „Отговор“ в групата „Отговор“ в раздела „Съобщение“.
6. В последващото писмо списъкът с прикачени файлове вече е в основния текст, както на екранната снимка по-долу.
7. Сега можете да копирате списъка с прикачени файлове в нов имейл.
8. По-късно използвайте този метод, за да копирате списъците с прикачени файлове на други имейли в новата поща.
9. Накрая можете да отпечатате тази нова поща както обикновено.

Метод 2: Отпечатайте списъци с прикачени файлове чрез Outlook VBA

1. За начало натиснете „Alt + F11“, за да отворите редактора на Outlook VBA.
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., която е световен лидер в технологиите за възстановяване на данни, включително ремонт mdf и outlook софтуерни продукти за ремонт. За повече информация посетете WWW.datanumen.com