Sådan udskrives den første side af vigtige indgående e-mails automatisk i din Outlook

Nogle brugere vil gerne lade Outlook automatisk udskrive de vigtige indgående e-mails. Også, hvis en sådan e-mail er for lang til ikke at spilde papir, udskriver Outlook kun den første side. Nu, i denne artikel, vil vi afsløre, hvordan man realiserer det programmatisk.

Det er ret nemt at udskrive den første side i en mail manuelt. Du kan bare ændre udskriftsindstillingerne inden udskrivning. Men hvis du håber, at Outlook automatisk kan identificere længden af ​​e-mail og automatisk udskrive den første side af en meget lang e-mail, skal du søge andre måder, såsom den følgende.

Udskriv den første side af vigtige indgående e-mails automatisk i din Outlook

Udskriv automatisk den første side af vigtige indgående e-mails

  1. Til at begynde med skal du starte din Outlook-applikation som normalt.
  2. Derefter skal du trykke på "Alt + F11" -tasterne i hovedvinduet i Outlook.
  3. Derefter får du adgang til VBA-editoren med succes.
  4. I dette nye vindue skal du åbne et tomt modul, hvor du skal kopiere følgende VBA-kode til dette modul.
Sub PrintFirstPage_ImportantIncomingEmails(objMail As Outlook.MailItem)
    Dim objWordApp As Word.Application
    Dim objTempWordDocument As Word.Document
    Dim objMailDocument As Word.Document
    Dim lPageCount As Long
 
    objMail.Display
    Set objMailDocument = objMail.GetInspector.WordEditor
    objMailDocument.Range.Copy
    
    Set objWordApp = CreateObject("Word.Application")
    Set objTempWordDocument = objWordApp.Documents.Add
    objWordApp.Visible = True
    objTempWordDocument.Activate
 
    objTempWordDocument.Range.Paste
 
    lPageCount = objTempWordDocument.ComputeStatistics(wdStatisticPages)
 
    'If the email takes up more than one page
    If lPageCount > 1 Then
       'Only print the first page
       objTempWordDocument.PrintOut Range:=wdPrintFromTo, From:="1", To:="1"
    Else
       'Otherwise, print the whole email
       objMail.PrintOut
    End If
 
    objMail.Close olDiscard
    objMail.UnRead = True
 
    objTempWordDocument.Close False
    objWordApp.Quit
End Sub

VBA-kode - Udskriv automatisk den første side af vigtige indgående e-mails

  1. Derefter kan du forlade det aktuelle vindue.
  2. Gå derefter til menuen "File" og klik på knappen "Manage Rules & Alerts".
  3. I pop op-dialogboksen "Regler og alarmer" skal du klikke på knappen "Ny regel".
  4. Vælg derefter "Anvend regel på meddelelser, jeg modtager" i den nye dialogboks i "Regelguiden" og tryk på "Næste".
  5. I det andet skærmbillede i “Regelguiden” skal du specificere betingelserne, nemlig at definere hvilke e-mails der er vigtige for dig, som at komme fra specifikke afsendere osv.
  6. Klik derefter på "Næste", som bringer dig til næste skærmbillede, hvor du skal indstille regelhandling. Vælg "Kør et script", og vælg den tidligere tilføjede makro.Vælg "Kør et script" Regelhandling
  7. Senere skal du klikke på flere “Næste”, indtil du får den sidste skærm - “Afslut regelopsætning”, hvor du kan angive et navn til denne regel og kontrollere regelindstillingen igen.
  8. Klik til sidst på "Udfør" for at gemme denne nye regel.
  9. Endelig siden da, hver gang en ny vigtig indgående e-mail kommer ind i din postkasse, udskriver Outlook automatisk sin første side, hvis den er for lang.

Uddrag maksimale data fra ødelagte PST-filer

Måske har du indset Outlook's sårbarhed. Under denne omstændighed må du ikke lade nogen sten stå ubeskyttet for at beskytte dine Outlook-data. Imidlertid vil du oftere end ikke opdage, at Outlook-data kan blive korrupte simpelthen på grund af en pludselig nedlukning. Således skal du forberede dig på uventet Outlook korruption, inklusive regelmæssige PST-sikkerhedskopier og et kraftigt fix-værktøj, ligesom DataNumen Outlook Repair.

Forfatter Introduktion:

Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder gendanne sql og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com

Kommentarer er lukket.