Kuidas automaatselt printida Outlookis oluliste sissetulevate meilide esimene leht

Outlooki lahendused September 29, 2025

Mõned kasutajad soovivad lasta Outlookil olulised sissetulevad meilid automaatselt printida. Samuti, kui selline meil on liiga pikk, prindib Outlook ainult esimese lehe, et mitte paberit raisata. Nüüd selles artiklis tutvustame, kuidas seda programmiliselt realiseerida.

Kirja esimese lehe käsitsi printimine on üsna lihtne. Enne printimist saate lihtsalt printimisvalikuid muuta. Kui aga loodate, et Outlook suudab meili pikkuse automaatselt tuvastada ja väga pika meili esimese lehe automaatselt printida, peate otsima muid vahendeid, näiteks järgmist.

Printige oma Outlookis oluliste sissetulevate meilide esimene leht automaatselt

Printige automaatselt tähtsate sissetulevate meilide esimene leht

  1. Alustuseks peate käivitama Outlooki rakenduse nagu tavaliselt.
  2. Seejärel peate Outlooki põhiaknas vajutama klahve Alt + F11.
  3. Seejärel pääsete edukalt juurde VBA redaktorile.
  4. Selles uues aknas peaksite avama tühja mooduli, kuhu peaksite sellesse moodulisse kopeerima järgmise VBA koodi.
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-kood – oluliste sissetulevate meilide esimese lehe automaatne printimine

  1. Pärast seda saate praegusest aknast väljuda.
  2. Seejärel minge menüüsse "Fail" ja klõpsake nuppu "Halda reegleid ja hoiatusi".
  3. Hüpikaknas "Reeglid ja hoiatused" klõpsake nuppu "Uus reegel".
  4. Järgmisena valige "Reeglite viisardi" uues dialoogiboksis "Rakenda reegel saadetud sõnumitele" ja klõpsake nuppu "Järgmine".
  5. "Reeglite viisardi" teisel ekraanil peaksite täpsustama tingimused, nimelt määratlema, millised meilid on teie jaoks olulised, näiteks konkreetsetelt saatjatelt pärit kirjad jne.
  6. Pärast seda klõpsake nuppu "Järgmine", mis viib teid järgmisele ekraanile, kus peate määrama reeglitoimingu. Valige "Käivita skript" ja valige eelnevalt lisatud makro.Valige reegli toiming "Käita skripti".
  7. Hiljem vajuta mitut nuppu "Järgmine", kuni ilmub viimane ekraan – "Lõpeta reegli seadistamine", kus saate määrata sellele reeglile nime ja kontrollida reegli seadistust veel kord.
  8. Viimasena klõpsake selle uue reegli salvestamiseks nuppu "Lõpeta".
  9. Lõpuks, sellest ajast peale, iga kord, kui teie postkasti satub uus oluline sissetulev meil, prindib Outlook automaatselt oma esimese lehe, kui see on liiga pikk.

Maksimaalne andmete eraldamine rikutud PST-failidest

Võib-olla olete mõistnud Outlooki haavatavust. Sel juhul ei tohi te oma Outlooki andmete kaitsmiseks ühtegi kivi pööramata jätta. Kuid sagedamini avastate, et Outlooki andmed võivad lihtsalt äkilise sulgemise tõttu rikkuda. Seetõttu peate ootamatusteks valmistuma Outlooki korruptsioon, sealhulgas tavalised PST-varukoopiad ja võimas parandustööriist, nagu DataNumen Outlook Repair.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas sql-i taastamine ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.