Cara Mencetak Secara automatik Halaman Pertama E-mel Penting Masuk di Outlook Anda

Sebilangan pengguna ingin membiarkan Outlook mencetak e-mel masuk yang penting secara automatik. Juga, jika e-mel seperti itu terlalu panjang, kerana tidak membuang kertas, Outlook hanya akan mencetak halaman pertama. Sekarang, dalam artikel ini, kami akan mendedahkan bagaimana mewujudkannya secara terprogram.

Untuk mencetak halaman pertama secara manual adalah sangat mudah. Anda hanya boleh menukar pilihan cetak sebelum mencetak. Walau bagaimanapun, jika anda berharap bahawa Outlook dapat mengenal pasti panjang e-mel secara automatik dan mencetak halaman pertama e-mel yang sangat panjang secara automatik, anda harus mencari cara lain, seperti yang berikut.

Cetak secara automatik Halaman Pertama E-mel Penting

1. Sebagai permulaan, anda perlu melancarkan aplikasi Outlook anda seperti biasa.
2. Kemudian di tetingkap Outlook utama, anda perlu menekan kekunci "Alt + F11".
3. Selepas itu, anda akan berjaya mengakses editor VBA.
4. Dalam tetingkap baru ini, anda harus membuka modul kosong, di mana anda harus menyalin kod VBA berikut ke dalam modul ini.

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

5. Selepas itu, anda boleh keluar dari tetingkap semasa.
6. Kemudian pergi ke menu "Fail" dan klik pada butang "Urus Peraturan & Makluman".
7. Dalam kotak dialog "Peraturan dan Makluman" pop timbul, klik pada butang "Peraturan Baru".
8. Selanjutnya, di kotak dialog baru "Rules Wizard", pilih "Terapkan aturan pada pesan yang saya terima" dan tekan "Next".
9. Pada skrin kedua "Rules Wizard", anda harus menentukan syaratnya, iaitu menentukan e-mel apa yang penting bagi anda, seperti datang dari pengirim tertentu, dll.
10. Selepas itu, klik "Next", yang akan membawa anda ke layar seterusnya, di mana anda perlu menetapkan tindakan peraturan. Pilih "Jalankan skrip" dan pilih makro yang ditambahkan sebelumnya.
11. Kemudian, klik beberapa "Seterusnya" hingga mendapatkan layar terakhir - "Selesaikan penyediaan peraturan", di mana anda dapat menentukan nama untuk peraturan ini dan periksa setelan peraturan sekali lagi.
12. Terakhir klik "Selesai" untuk menyimpan peraturan baru ini.
13. Akhirnya, sejak itu, setiap kali e-mel masuk penting baru masuk ke peti mel anda, Outlook akan mencetak halaman pertama secara automatik jika terlalu panjang.

Ekstrak Data Maksimum dari Fail PST yang rosak

Mungkin anda telah menyedari kerentanan Outlook. Dalam keadaan ini, anda tidak boleh berusaha keras untuk melindungi data Outlook anda. Walau bagaimanapun, lebih kerap daripada anda, anda akan mendapati bahawa data Outlook boleh rosak hanya kerana ditutup secara tiba-tiba. Oleh itu, anda harus membuat persiapan untuk perkara yang tidak dijangka Rasuah Outlook, termasuk sandaran PST biasa dan alat pembaikan yang kuat, seperti DataNumen Outlook Repair.

Pengenalan Pengarang:

Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk pulihkan sql dan produk perisian pembaikan prospek. Untuk maklumat lebih lanjut, lawati www.datanumen.com