Note: The other languages of the website are Google-translated. Back to English

Outlook: e-mail afdrukken zonder afbeeldingen

Over het algemeen wordt een e-mail in Outlook afgedrukt, de afbeeldingen worden ook afgedrukt. Maar soms wilt u de teksten gewoon afdrukken zonder de afbeeldingen, maar in Outlook is er geen ingebouwde functie die deze taak kan ondersteunen. Deze zelfstudie biedt een VBA-code die de afbeeldingsvrije e-mail onmiddellijk via Word afdrukt. Of als uw computer geen printer heeft, exporteert de VBA-code de e-mail eerst als een PDF zonder afbeeldingen, en vervolgens kunt u de PDF afdrukken nadat de printer beschikbaar is.

VBA om e-mail af te drukken zonder afbeeldingen

Office-tabblad - Schakel bewerken en browsen met tabbladen in Office in en maak het werk veel gemakkelijker ...
Kutools for Outlook - Brengt 100 krachtige geavanceerde functies naar Microsoft Outlook
  • Auto CC / BCC volgens regels bij het verzenden van e-mail; Automatisch doorsturen Meerdere e-mails volgens regels; Auto antwoord zonder uitwisselingsserver, en meer automatische functies ...
  • BCC-waarschuwing - toon bericht wanneer u iedereen probeert te beantwoorden als uw e-mailadres in de BCC-lijst staat; Herinner bij ontbrekende bijlagen, en meer herinneren functies ...
  • Beantwoorden (alle) met alle bijlagen in het mailgesprek; Beantwoord veel e-mails tegelijk; Begroeting automatisch toevoegen wanneer antwoord; Datum en tijd automatisch toevoegen aan onderwerp ...
  • Hulpmiddelen voor bijlagen: Automatisch loskoppelen, alles comprimeren, alles hernoemen, alles automatisch opslaan ... Quick Report, Tel geselecteerde e-mails, Dubbele e-mails en contacten verwijderen ...
  • Meer dan 100 geavanceerde functies zullen los de meeste van uw problemen op in Outlook 2010-2019 en 365. Gratis proefperiode van 60 dagen met volledige functionaliteit.

VBA om e-mail af te drukken zonder afbeeldingen

 

1. Selecteer een e-mail waarvan u alleen de tekst wilt afdrukken en druk vervolgens op anders + F11 toetsen om in te schakelen Microsoft Visual Basic voor toepassingen venster.

2. klikken Invoegen > Module om een ​​nieuwe lege module te maken, kopieer en plak vervolgens de onderstaande code in de module.

VBA: e-mail exporteren zonder afbeeldingen

Sub PrintWithoutImages()
'UpdatebyExtendoffice20220414
  Dim xMail As Outlook.MailItem
  Dim xFileName As String, xSubject As String
  Dim xWord As Word.Application
  Dim xWordDoc As Word.Document
  Dim xInlineShape As Word.InlineShape
  Dim InvalidArr
  On Error Resume Next
  If Application.ActiveWindow.Class = olInspector Then
    Set xMail = ActiveInspector.CurrentItem
  ElseIf Application.ActiveWindow.Class = olExplorer Then
    Set xMail = ActiveExplorer.Selection.Item(1)
  End If
  
  InvalidArr = Array("/", "\", "*", ":", Chr(34), "?", "<", ">", "|")
  xSubject = xMail.Subject
  For i = 0 To UBound(InvalidArr)
    xSubject = VBA.Replace(xSubject, InvalidArr(i), "")
  Next i
  
  xFileName = Environ("Temp") & "\" & xSubject & ".doc"
Debug.Print xFileName
  xMail.SaveAs xFileName, olDoc
  Set xWord = CreateObject("Word.Application")
  xWord.Visible = False
  Set xWordDoc = xWord.Documents.Open(xFileName)
  For Each xInlineShape In xWordDoc.InlineShapes
      xInlineShape.Delete
  Next
  xWordDoc.PrintOut
  xWordDoc.Close
  xWord.Quit
  Kill xFileName
End Sub

doc verwijder dubbele agenda-items 1

3. klikken Toolbox > Referenties in staat te stellen Referenties - Project 1 dialoog, vink aan Microsoft Word 16.0-objectbibliotheek selectievakje. Klik OK.

 doc verwijder dubbele agenda-items 1

doc verwijder dubbele agenda-items 1

4-1. Houd de cursor binnen de code en druk op F5 toets of klik lopen knop om de code uit te voeren, dan wordt de e-mail zonder afbeeldingen onmiddellijk via Word afgedrukt. Maar als uw computer geen printer heeft, volg dan stap 4.

4-2. Als uw computer geen printer heeft, drukt u op F5 toets of klikken lopen knop om de code uit te voeren, verschijnt er een dialoogvenster waarin u een map kunt kiezen om het PDF-bestand te plaatsen en het PDF-bestand een naam te geven. Klik Bespaar .

 doc verwijder dubbele agenda-items 1

Nu is de e-mail geëxporteerd als een PDF zonder afbeeldingen. Open het PDF-bestand en klik met de rechtermuisknop om te selecteren Print om de e-mail af te drukken.

doc verwijder dubbele agenda-items 1

doc verwijder dubbele agenda-items 1

Tip: Als u geselecteerde e-mails in bulk wilt opslaan als PDF (of Word, CSV, Excel, Txt, HTML-bestanden) met afbeeldingen, kopteksten, hoofdteksten, Cc's, de Bulk opslaan kenmerk van Kutools for Outlook kan u helpen, die slechts 3 stappen nodig heeft.

1. Selecteer e-mails.

2. klikken Kutools > Bulk opslaan.

doc verwijder dubbele agenda-items 1

3. Kies een locatie en vink de gewenste bestandsindeling(en) aan, klik op OK.

doc verwijder dubbele agenda-items 1

doc verwijder dubbele agenda-items 1

Ontvang nu een gratis proefperiode van 30 dagen voor Kutools voor Outlook.


Kutools voor Outlook - Brengt 100 geavanceerde functies naar Outlook en maakt het werk veel gemakkelijker!

  • Auto CC / BCC volgens regels bij het verzenden van e-mail; Automatisch doorsturen Meerdere e-mails op maat; Auto antwoord zonder uitwisselingsserver, en meer automatische functies ...
  • BCC-waarschuwing - toon bericht wanneer u alle probeert te beantwoorden als uw e-mailadres in de BCC-lijst staat; Herinner bij ontbrekende bijlagen, en meer herinneren functies ...
  • Beantwoorden (alle) met alle bijlagen in het e-mailgesprek; Beantwoord veel e-mails in seconden; Begroeting automatisch toevoegen wanneer antwoord; Datum toevoegen aan onderwerp ...
  • Hulpmiddelen voor bijlagen: beheer alle bijlagen in alle e-mails, Automatisch loskoppelen, Alles comprimeren, Alles hernoemen, Alles opslaan ... Snel rapport, Tel geselecteerde e-mails...
  • Krachtige ongewenste e-mails op maat; Verwijder dubbele e-mails en contacten... Stel u in staat om slimmer, sneller en beter te doen in Outlook.
shot kutools outlook kutools tabblad 1180x121
shot kutools vooruitzichten kutools plus tabblad 1180x121
 
Comments (0)
Nog geen beoordelingen. Beoordeel als eerste!
Er zijn nog geen reacties geplaatst
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0  Personages
Voorgestelde locaties