Jak wykluczyć osadzone obrazy podczas drukowania wiadomości e-mail programu Outlook

Podziel się teraz:

Czasami możesz po prostu chcieć wydrukować tekst wiadomości e-mail bez osadzonych obrazów. Zamiast usuwać obrazy przed wydrukowaniem, możesz zastosować metodę przedstawioną w tym artykule. Może automatycznie wykluczać obrazy podczas drukowania.

Jak wszyscy wiemy, drukowanie obrazów to marnowanie atramentu. Dlatego czasami podczas drukowania wiadomości e-mail możesz pomyśleć, że wstawione obrazy są bezużyteczne. Dlatego możesz chcieć wykluczyć obrazy podczas drukowania wiadomości e-mail. W takim przypadku możesz skorzystać z następującego sposobu, aby osiągnąć to z łatwością.

Wyklucz osadzone obrazy podczas drukowania wiadomości e-mail programu Outlook

Wyklucz osadzone obrazy podczas drukowania wiadomości e-mail

  1. Najpierw uruchom aplikację Outlook.
  2. Następnie uzyskaj dostęp do edytora Outlook VBA zgodnie z artykułem – „Jak uruchomić kod VBA w swoim Outlooku".
  3. Następnie należy włączyć „Bibliotekę obiektów MS Word”, o której można przeczytać w „Jak dodać odwołanie do biblioteki obiektów w języku VBA".
  4. Następnie umieść następujący kod VBA w nieużywanym module.
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

Kod VBA — wyklucza osadzone obrazy podczas drukowania wiadomości e-mail

  1. Później zamknij bieżące okno „Microsoft Visual Basic for Applications”.
  2. Następnie dodaj nowe makro do paska narzędzi Szybki dostęp.
  3. W końcu możesz teraz wypróbować to makro.
  • Aby rozpocząć, wybierz lub otwórz wiadomość e-mail źródłową.
  • Następnie kliknij przycisk makra na pasku narzędzi Szybki dostęp.Uruchom makro w wybranej wiadomości e-mail
  • Od razu wiadomość e-mail zostanie wydrukowana bez osadzonych obrazów, co będzie wyglądać jak na poniższym zrzucie ekranu:Wydrukowany e-mail

Skutecznie chroń swoje dane programu Outlook

W dzisiejszych czasach dane są zawsze niepewne, ponieważ istnieje zbyt wiele potencjalnych zagrożeń, takich jak usterki sprzętu, błędy oprogramowania, infekcje wirusowe i tak dalej. To samo dotyczy danych programu Outlook. Dlatego musisz dołożyć starań, aby zabezpieczyć swoje dane Outlooka. Na przykład powinieneś regularnie tworzyć kopie zapasowe PST. Ponadto musisz nauczyć się używać skanpst naprawić plik programu Outlook. Wreszcie, przygotowanie potężnego narzędzia do naprawy zewnętrznej jest również kwestią konieczności, np DataNumen Outlook Repair.

Wprowadzenie autora:

Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym odzyskać mdf i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com

Podziel się teraz:

Możliwość dodawania komentarzy nie jest dostępna.