Иногда вы можете просто распечатать текст электронного письма, не включая встроенные изображения. Вместо того, чтобы удалять изображения перед печатью, вы можете применить метод, представленный в этой статье. Он может автоматически исключать изображения при печати.
Как мы все знаем, печать изображений требует траты чернил. Поэтому иногда при печати письма может показаться, что вставленные изображения бесполезны. Таким образом, вы можете исключить изображения при печати электронного письма. В этом случае вы можете использовать следующий способ добиться этого с легкостью.
Исключить встроенные изображения при печати электронного письма
- Прежде всего, запустите приложение Outlook.
- Затем войдите в редактор Outlook VBA в соответствии со статьей — «Как запустить код VBA в Outlook».
- Затем необходимо включить «Библиотеку объектов MS Word», информацию о которой можно найти в разделе «Как добавить ссылку на библиотеку объектов в VBA».
- После этого поместите следующий код VBA в неиспользуемый модуль.
Sub ExcludeEmebeddedImagesWhenPrintingEmail()
Dim objMail As Outlook.MailItem
Dim strMailDocument As String
Dim objWordApp As Word.Application
Dim objMailDocument As Word.Document
Dim objInlineShape As Word.InlineShape
'Get the source email
Select Case Application.ActiveWindow.Class
Case olInspector
Set objMail = ActiveInspector.CurrentItem
Case olExplorer
Set objMail = ActiveExplorer.Selection.Item(1)
End Select
'Save the email as a Word document
strMailDocument = Environ("Temp") & "\" & objMail.Subject & ".doc"
objMail.SaveAs strMailDocument, olDoc
'Remove the embedded images from the document
Set objWordApp = CreateObject("Word.Application")
Set objMailDocument = objWordApp.Documents.Open(strMailDocument)
objWordApp.Visible = True
For Each objInlineShape In objMailDocument.InlineShapes
objInlineShape.Delete
Next
'Print out the document
objMailDocument.PrintOut
objMailDocument.Close
objWordApp.Quit
Kill strMailDocument
End Sub
- Позже закройте текущее окно «Microsoft Visual Basic для приложений».
- После этого добавьте новый макрос на панель быстрого доступа.
- В конце концов, вы можете попробовать этот макрос прямо сейчас.
- Для начала выберите или откройте электронное письмо, указанное в исходном файле.
- Затем нажмите кнопку макроса на панели быстрого доступа.
- Сразу будет распечатано электронное письмо без встроенных изображений, что будет выглядеть как на следующем снимке экрана:
Защитите свои данные Outlook эффективно
В настоящее время данные всегда небезопасны, поскольку существует слишком много потенциальных рисков, таких как аппаратные сбои, сбои программного обеспечения, заражение вирусами и так далее. То же самое относится и к вашим данным Outlook. Следовательно, вы должны приложить усилия для защиты ваших данных Outlook. Например, вы должны регулярно делать резервные копии PST. Кроме того, вам нужно научиться пользоваться Скэнпст восстановить файл Outlook. И последнее, но не менее важное: подготовка мощного внешнего инструмента восстановления также является вопросом необходимости, например DataNumen Outlook Repair.
Об авторе:
Ширли Чжан — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая восстановить мдф и программные продукты для ремонта Outlook. Для получения дополнительной информации посетите www.datanumen.com