Як автоматично надрукувати першу сторінку важливих вхідних листів у вашому

Деякі користувачі хочуть дозволити програмі Outlook автоматично друкувати важливі вхідні електронні листи. Крім того, якщо такий електронний лист занадто довгий, щоб не витрачати документи, Outlook надрукує лише першу сторінку. Тепер у цій статті ми розповімо, як це реалізувати програмно.

Друкувати першу сторінку листа вручну досить просто. Ви можете просто змінити параметри друку перед друком. Однак якщо ви сподіваєтесь, що Outlook може автоматично визначити довжину електронного листа та автоматично надрукувати першу сторінку дуже довгого електронного листа, вам доведеться шукати інші способи, наприклад, наступний.

Автодрук першої сторінки важливих вхідних листів

1. Для початку вам потрібно запустити програму Outlook як зазвичай.
2. Потім у головному вікні Outlook потрібно натиснути клавіші “Alt + F11”.
3. Згодом ви успішно отримаєте доступ до редактора VBA.
4. У цьому новому вікні ви повинні відкрити порожній модуль, в якому вам слід скопіювати наступний код VBA в цей модуль.

Sub PrintFirstPage_ImportantIncomingEmails(objMail As Outlook.MailItem)
    Dim objWordApp As Word.Application
    Dim objTempWordDocument As Word.Document
    Dim objMailDocument As Word.Document
    Dim lPageCount As Long
 
    objMail.Display
    Set objMailDocument = objMail.GetInspector.WordEditor
    objMailDocument.Range.Copy
    
    Set objWordApp = CreateObject("Word.Application")
    Set objTempWordDocument = objWordApp.Documents.Add
    objWordApp.Visible = True
    objTempWordDocument.Activate
 
    objTempWordDocument.Range.Paste
 
    lPageCount = objTempWordDocument.ComputeStatistics(wdStatisticPages)
 
    'If the email takes up more than one page
    If lPageCount > 1 Then
       'Only print the first page
       objTempWordDocument.PrintOut Range:=wdPrintFromTo, From:="1", To:="1"
    Else
       'Otherwise, print the whole email
       objMail.PrintOut
    End If
 
    objMail.Close olDiscard
    objMail.UnRead = True
 
    objTempWordDocument.Close False
    objWordApp.Quit
End Sub

5. Після цього ви можете вийти з поточного вікна.
6. Потім перейдіть до меню «Файл» і натисніть кнопку «Керувати правилами та сповіщеннями».
7. У спливаючому діалоговому вікні «Правила та попередження» натисніть кнопку «Нове правило».
8. Далі, у новому діалоговому вікні “Майстра правил” виберіть “Застосувати правило до повідомлень, які я отримую” та натисніть “Далі”.
9. На другому екрані «Майстра правил» ви повинні вказати умови, а саме визначити, які електронні листи є важливими для вас, наприклад, що надходять від конкретних відправників тощо
10. Після цього натисніть “Далі”, що призведе до наступного екрана, на якому вам потрібно буде встановити дію правила. Виберіть “Запустити сценарій” і виберіть попередньо доданий макрос.
11. Пізніше натисніть кілька «Далі», доки не з’явиться останній екран - «Завершити налаштування правила», в якому ви можете вказати назву цього правила та ще раз перевірити налаштування правила.
12. Нарешті натисніть "Готово", щоб зберегти це нове правило.
13. Нарешті, з тих пір кожного разу, коли до вашої поштової скриньки потрапляє нове важливе вхідне повідомлення електронної пошти, Outlook автоматично друкує свою першу сторінку, якщо вона занадто довга.

Витягніть максимум даних із пошкоджених файлів PST

Можливо, ви усвідомили вразливість Outlook. За цієї обставини ви не повинні залишати жодного каменю на захисті даних Outlook. Однак найчастіше ви виявляєте, що дані Outlook можуть бути пошкоджені просто внаслідок раптового вимкнення. Таким чином, вам доведеться готуватися до несподіваного Корупція в Outlook, включаючи регулярні резервні копії PST та потужний інструмент виправлення, наприклад DataNumen Outlook Repair.

Вступ автора:

Ширлі Чжан - експерт із відновлення даних у DataNumen, Inc., яка є світовим лідером у галузі технологій відновлення даних, в тому числі відновити sql та перспективні програмні продукти для ремонту. Для отримання додаткової інформації відвідайте WWW.datanumen.com