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

Outlook : Comment imprimer un e-mail sans images

En général, en imprimant un e-mail dans Outlook, les images seront également imprimées. Mais parfois, vous souhaitez simplement imprimer les textes sans les images, cependant, dans Outlook, aucune fonctionnalité intégrée ne peut prendre en charge ce travail. Ce didacticiel fournit un code VBA qui imprimera immédiatement l'e-mail sans image via Word. Ou lorsque votre ordinateur n'a pas d'imprimante, le code VBA exportera d'abord l'e-mail au format PDF sans images, puis vous pourrez imprimer le PDF une fois l'imprimante disponible.

VBA pour imprimer des e-mails sans images

Onglet Office - Activez la modification et la navigation par onglets dans Office et simplifiez considérablement le travail ...
Kutools for Outlook - apporte 100 fonctionnalités avancées puissantes à Microsoft Outlook
  • CC / BCC automatique par des règles lors de l'envoi d'e-mails; Transfert automatique Emails multiples par règles; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse e-mail est dans la liste BCC; Rappeler en cas de pièces jointes manquantes, et plus de fonctionnalités de rappel ...
  • Répondre (à tous) avec toutes les pièces jointes dans la conversation par courrier; Répondre à plusieurs e-mails à la fois; Ajouter un message d'accueil automatique quand répondre; Ajout automatique de la date et de l'heure au sujet ...
  • Outils de fixation: Détacher automatiquement, Tout compresser, Tout renommer, Tout enregistrer automatiquement ... Rapport rapide, Compter les courriers sélectionnés, Supprimer les messages et contacts en double ...
  • Plus de 100 fonctionnalités avancées résoudre la plupart de vos problèmes dans Outlook 2010-2019 et 365. Fonctionnalités complètes Essai gratuit de 60 jours.

VBA pour imprimer des e-mails sans images

 

1. Sélectionnez un e-mail dont vous souhaitez imprimer uniquement le texte, puis appuyez sur autre + F11 clés pour activer Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Module pour créer un nouveau module vierge, puis copiez et collez le code ci-dessous dans le module.

VBA : exporter des e-mails sans images

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 supprimer les éléments de calendrier en double 1

3. Cliquez Outils > Références autoriser Références - Projet 1 boîte de dialogue, cocher Bibliothèque d'objets Microsoft Word 16.0 case à cocher Cliquez sur OK.

 doc supprimer les éléments de calendrier en double 1

doc supprimer les éléments de calendrier en double 1

4-1. Maintenez le curseur dans le code et appuyez sur F5 touche ou cliquez course bouton pour exécuter le code, puis l'e-mail sans images sera imprimé immédiatement via Word. Mais si votre ordinateur n'a pas d'imprimante, veuillez suivre l'étape 4.

4-2. Lorsque votre ordinateur n'a pas d'imprimante, après avoir appuyé sur F5 touche ou clic course bouton pour exécuter le code, une boîte de dialogue apparaît pour choisir un dossier pour placer le fichier PDF et nommer le fichier PDF. Cliquez sur Enregistrer.

 doc supprimer les éléments de calendrier en double 1

Maintenant, l'e-mail a été exporté au format PDF sans images. Ouvrez le fichier PDF et faites un clic droit pour sélectionner IMPRESSION pour imprimer l'e-mail.

doc supprimer les éléments de calendrier en double 1

doc supprimer les éléments de calendrier en double 1

Conseil : Si vous souhaitez enregistrer en bloc les e-mails sélectionnés au format PDF (ou fichiers Word, CSV, Excel, Txt, HTML) avec des images, des en-têtes, des corps, des Ccs, le Économisez en vrac caractéristique de Kutools pour Outlook peut vous aider, ce qui ne nécessite que 3 étapes.

1. Sélectionnez les e-mails.

2. Cliquez Kutools > Économisez en vrac.

doc supprimer les éléments de calendrier en double 1

3. Choisissez un emplacement et cochez le ou les formats de fichier souhaités, cliquez sur OK.

doc supprimer les éléments de calendrier en double 1

doc supprimer les éléments de calendrier en double 1

Obtenez un essai gratuit de 30 jours de Kutools pour Outlook maintenant.


Kutools for Outlook - Apporte 100 fonctionnalités avancées à Outlook et simplifie grandement le travail!

  • CC / BCC automatique par des règles lors de l'envoi d'e-mails; Transfert automatique Emails multiples par coutume; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse e-mail est dans la liste BCC; Rappeler en cas de pièces jointes manquantes, et plus de fonctionnalités de rappel ...
  • Répondre (à tous) avec toutes les pièces jointes dans la conversation par courrier électronique; Répondre à de nombreux e-mails en secondes; Ajouter un message d'accueil automatique quand répondre; Ajouter la date au sujet ...
  • Outils de pièces jointes: gérer toutes les pièces jointes dans tous les courriers, Détachement automatique, Compresser tout, Tout renommer, Tout enregistrer ... Rapport rapide, Compter les courriers sélectionnés...
  • Courriels indésirables puissants par coutume; Supprimer les messages et contacts en double... Vous permettre de faire plus intelligemment, plus rapidement et mieux dans Outlook.
tir kutools outlook onglet kutools 1180x121
tir kutools outlook kutools plus onglet 1180x121
 
Commentaires (0)
Pas encore de notes. Soyez le premier à évaluer!
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0  Personnages
Emplacements suggérés