Noen ganger trenger du bare å skrive ut den vanlige eller internettbaserte overskriften i en Outlook-e-post. Nå vil dette innlegget dele deg to raske og enkle fremgangsmåter.
Fra forrige artikkel – "2 tips for å skrive ut en Outlook-e-post uten overskrift og brukernavn", kan du lære de enkle måtene å skrive ut bare meldingsteksten i en e-post. Men noen ganger vil du kanskje bare skrive ut den vanlige eller internett-overskriften til en e-post, nemlig avsenderen, mottakerne og annen informasjon til e-posten. Så, heretter, vil vi lære deg 2 metoder for å få det.
Metode 1: Skriv ut manuelt
Skriv ut internetthode
- Først dobbeltklikker du på e-posten for å åpne den i meldingsvinduet.
- Gå deretter til "Fil"-menyen.
- På "Info"-fanen klikker du på "Egenskaper" -knappen.

- I "Egenskaper"-vinduet klikker du på "Internett-overskrifter"-boksen.
- Deretter trykker du på "Ctrl + A" for å velge alle og "Ctrl + C" for å kopiere hele overskriftene.
- Senere, opprett en ny e-post og trykk "Ctrl + V" for å lime inn overskriftene i brødteksten.
- Til slutt, gå til "Fil"> "Skriv ut" for å skrive ut den nye e-posten.
Skriv ut vanlig topptekst
- Til å begynne med, velg eller åpne kilde-e-posten.
- Klikk deretter på "Videresend"-knappen.
- I popup-videresendingsposten velger og fjerner du den opprinnelige e-postens meldingstekst for å la bare overskriften stå, som følgende skjermbilde.
- Til slutt, skriv ut gjeldende videresendingspost som vanlig.
Metode 2: Skriv ut med VBA
Skriv ut internetthode
- For det første, åpne eller velg e-posten du ønsker.
- Start deretter Outlook VBA-redigering via "Alt + F11".
- Deretter legger du følgende kode inn i en 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 slutt klikker du på "Kjør"-ikonet i verktøylinjen.
- Med en gang vil Internett-overskriften til e-posten skrives ut.
Skriv ut vanlig topptekst
- Fortsatt i VBA-redigering, kopier koden nedenfor inn i en modul.
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
- Etter det, kjør denne makroen.
- Umiddelbart vil den vanlige overskriften på e-posten bli skrevet ut.
Se opp for ukjente e-poster
Overskrifter kan avsløre mye informasjon om e-posten, inkludert IP-adressene. Hvis du vil identifisere om en e-post er mistenkelig, må overskriftene sjekkes. For å være ærlig, anbefales det å ikke stole på e-poster fra ukjente avsendere, da de fleste av dem er spam og til og med inneholder skadelige makroer. De kan enkelt angripe Outlook-filen din. Hvis Outlook-filen er skadet, må du gjøre en innsats for å Outlook reparasjon. Den er ganske knotete med mindre du tyr til et profesjonelt og robust verktøy, som f.eks DataNumen Outlook Repair.
Forfatterintroduksjon:
Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert SQL Server korrupsjon og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med






