一些用戶希望讓Outlook自動打印重要的傳入電子郵件。 另外，如果此類電子郵件太長，以至於不會浪費紙張，Outlook將僅打印第一頁。 現在，在本文中，我們將介紹如何以編程方式實現它。
手動打印郵件的第一頁非常容易。 您可以在打印之前更改打印選項。 但是，如果希望Outlook可以自動識別電子郵件的長度並自動打印很長的電子郵件的第一頁，則必須尋求其他方法，例如以下方法。
自動打印重要的接收電子郵件的第一頁
- 首先，您需要正常啟動Outlook應用程序。
- 然後，在Outlook主窗口中，您需要按“ Alt + F11”鍵。
- 隨後，您將成功訪問VBA編輯器。
- 在這個新窗口中，您應該打開一個空模塊，在其中應將以下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
- 之後，您可以退出當前窗口。
- 然後轉到“文件”菜單，然後單擊“管理規則和警報”按鈕。
- 在彈出的“規則和警報”對話框中，單擊“新規則”按鈕。
- 接下來，在“規則嚮導”的新對話框中，選擇“對收到的郵件應用規則”，然後單擊“下一步”。
- 在“規則嚮導”的第二個屏幕中，您應該指定條件，即定義哪些電子郵件對您很重要，例如來自特定發件人的電子郵件等。
- 之後，單擊“下一步”，這將帶您進入下一個屏幕，您需要在其中設置規則操作。 選擇“運行腳本”，然後選擇以前添加的宏。
- 稍後，單擊多個“下一步”，直到獲得最後一個屏幕-“完成規則設置”，您可以在其中指定此規則的名稱並再次檢查規則設置。
- 最後單擊“完成”以保存此新規則。
- 最後，此後，每次有新的重要傳入電子郵件進入您的郵箱時，如果時間過長，Outlook都會自動打印其第一頁。
從損壞的PST文件中提取最大數據
也許您已經意識到Outlook的漏洞。 在這種情況下，您必須千方百計保護Outlook數據。 但是，您經常會發現，由於突然關閉，Outlook數據可能會損壞。 因此，您必須為意外做好準備 Outlook損壞，包括常規的PST備份和有效的修復工具，例如 DataNumen Outlook Repair.
作者簡介：
Shirley Zhang是的數據恢復專家 DataNumen，Inc.是數據恢復技術的全球領導者，包括 恢復SQL 和Outlook修復軟件產品。 欲了解更多信息，請訪問 萬維網。datanumen.COM