Nogle gange behøver du kun at udskrive den normale eller internetbaserede header i en Outlook-e-mail. I dette indlæg vil du se to hurtige og enkle metoder.
Fra den forrige artikel - “2 tip til at udskrive en Outlook-e-mail uden overskrift og brugernavn“, Du kan lære de nemme måder at kun udskrive meddelelsens brødtekst på en mail. Men nogle gange vil du måske bare udskrive den normale eller internetoverskrift på en e-mail, nemlig afsenderen, modtagere og andre oplysninger i e-mailen. Så i det følgende lærer vi dig to metoder til at få det.
Metode 1: Udskriv manuelt
Udskriv internetoverskrift
- Dobbeltklik først på e-mailen for at åbne den i meddelelsesvinduet.
- Gå derefter til menuen "File".
- Klik på knappen "Egenskaber" på fanen "Info".

- I vinduet "Egenskaber" skal du klikke i feltet "Internetoverskrifter".
- Tryk derefter på "Ctrl + A" for at vælge alle og "Ctrl + C" for at kopiere de fulde overskrifter.
- Senere skal du oprette en ny mail via e-mail og trykke på "Ctrl + V" for at indsætte overskrifterne i kroppen.
- Gå til sidst til "File"> "Print" for at udskrive den nye mail.
Udskriv Normal overskrift
- Til at begynde med skal du vælge eller åbne kilde-e-mailen.
- Klik derefter på knappen "Videresend".
- I popup-videresendelsesmail skal du vælge og fjerne den originale mails meddelelsestekst for kun at forlade overskriften, som det følgende skærmbillede.
- I sidste ende skal du udskrive den aktuelle videresendelsespost som normalt.
Metode 2: Udskriv med VBA
Udskriv internetoverskrift
- Til at starte med skal du åbne eller vælge den ønskede mail.
- Start derefter Outlook VBA-editor via “Alt + F11”.
- Sæt derefter følgende kode i et modul.
Sub PrintFullHeaders()
Dim objMail As Outlook.MailItem
Dim objPropertyAccessor As Outlook.PropertyAccessor
Dim strHeader As String
Dim objTempMail As Outlook.MailItem
Select Case Outlook.Application.ActiveWindow.Class
Case olInspector
Set objMail = ActiveInspector.CurrentItem
Case olExplorer
Set objMail = ActiveExplorer.Selection.Item(1)
End Select
'Get full headers
Set objPropertyAccessor = objMail.PropertyAccessor
strHeader = objPropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x007D001E")
'Print headers in temp mail
Set objTempMail = Outlook.Application.CreateItem(olMailItem)
objTempMail.HTMLBody = "<HTML><BODY>" & strHeader & "</BODY></HTML>"
objTempMail.PrintOut
End Sub
- Til sidst skal du klikke på ikonet "Kør" i værktøjslinjen.
- Straks udskrives e-mailens internetoverskrift.
Udskriv Normal overskrift
- Kopier koden nedenfor til et modul i VBA-editor.
Sub PrintShortHeaders()
Dim objMail As Outlook.MailItem
Dim objTempMail As Outlook.MailItem
Select Case Outlook.Application.ActiveWindow.Class
Case olInspector
Set objMail = ActiveInspector.CurrentItem
Case olExplorer
Set objMail = ActiveExplorer.Selection.Item(1)
End Select
Set objTempMail = objMail.Copy
'Remove the body, leave headers only
objTempMail.Body = ""
objTempMail.PrintOut
End Sub
- Kør derefter denne makro.
- Straks udskrives den normale overskrift på e-mailen.
Hold øje med ukendte mails
Overskrifter kan afsløre mange oplysninger om e-mailen, inklusive IP-adresserne. Hvis du vil identificere, om en e-mail er mistænkelig, skal overskrifterne kontrolleres. For at være ærlig anbefales det ikke at stole på e-mails fra ukendte afsendere, da de fleste af dem er spam og endda indeholder ondsindede makroer. De kan nemt angribe din Outlook-fil. Hvis Outlook-filen er beskadiget, skal du gøre en indsats for at... Outlook reparation. Det er ret knudret, medmindre du bruger et professionelt og robust værktøj, som f.eks DataNumen Outlook Repair.
Forfatter Introduktion:
Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder SQL Server korruption og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com






