Kako isključiti ugrađene slike prilikom štampanja Outlook e-pošte

Ponekad ćete možda jednostavno htjeti odštampati tekst e-pošte, ne uključujući ugrađene slike. Umjesto da uklanjate slike prije ispisa, možete primijeniti metodu predstavljenu u ovom članku. Može automatski isključiti slike prilikom štampanja.

Kao što svi znamo, štampanje slika je trošenje mastila. Stoga, ponekad, kada ispisujete e-poštu, možete pomisliti da su umetnute slike beskorisne. Stoga, možda želite da isključite slike prilikom štampanja e-pošte. U ovom slučaju, možete koristiti sljedeći način da to postignete s lakoćom.

Izuzmite ugrađene slike prilikom štampanja e-pošte

1. Prvo pokrenite Outlook aplikaciju.
2. Zatim pristupite Outlook VBA editoru prema članku – “Kako pokrenuti VBA kod u vašem Outlooku".
3. Nakon toga, potrebno je da omogućite „MS Word Object Library“, o čemu možete pročitati više u „Kako dodati referencu biblioteke objekata u VBA".
4. Nakon toga, stavite sljedeći VBA kod u neiskorišteni modul.

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

5. Kasnije zatvorite trenutni prozor „Microsoft Visual Basic za aplikacije“.
6. Nakon toga, dodajte novi makro na alatnu traku za brzi pristup.
7. Na kraju, sada možete isprobati ovaj makro.

• Za početak, odaberite ili otvorite izvornu e-poštu.
• Zatim kliknite na dugme makro na traci sa alatkama za brzi pristup.
• E-mail će odmah biti odštampan bez ugrađenih slika, što će izgledati kao na sljedećem snimku ekrana:

Efikasno zaštitite svoje Outlook podatke

Danas su podaci uvijek nesigurni jer postoji previše potencijalnih rizika, kao što su hardverski kvarovi, softverski kvarovi, infekcija virusima i tako dalje. Isto vrijedi i za vaše Outlook podatke. Stoga morate uložiti napore da zaštitite svoje Outlook podatke. Na primjer, trebali biste redovno praviti sigurnosne kopije PST-a. Osim toga, morate naučiti kako koristiti scanpst da popravite Outlook datoteku. Na kraju, ali ne i najmanje važno, priprema moćnog vanjskog alata za popravku je također stvar nužde, npr DataNumen Outlook Repair.

Uvod za autora:

Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući oporaviti mdf i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com