Outlook-da muhim kiruvchi elektron pochta xabarlarining birinchi sahifasini qanday avtomatik chop etish mumkin

Hozir ulashing:

Ba'zi foydalanuvchilar Outlook-ga muhim kiruvchi xatlarni avtomatik chop etishga ruxsat berishni xohlashadi. Bundan tashqari, agar bunday elektron pochta juda uzun bo'lsa, qog'ozlarni isrof qilmaslik uchun Outlook faqat birinchi sahifani chop etadi. Endi ushbu maqolada biz buni qanday qilib dasturiy jihatdan amalga oshirishni ko'rsatamiz.

Pochtaning birinchi sahifasini qo'lda chop etish juda oson. Siz chop etishdan oldin chop etish parametrlarini o'zgartirishingiz mumkin. Ammo, agar Outlook avtomatik ravishda elektron pochta uzunligini aniqlay oladi deb umid qilsangiz va juda uzun elektron pochtaning birinchi sahifasini avtomatik chop etsangiz, boshqa vositalarni izlashingiz kerak, masalan, quyidagi.

Outlook-dagi muhim kiruvchi xatlarning birinchi sahifasini avtomatik chop etish

Muhim kiruvchi xatlarning birinchi sahifasini avtomatik chop etish

  1. Boshlash uchun Outlook ilovasini odatdagidek ishga tushirishingiz kerak.
  2. Keyin asosiy Outlook oynasida "Alt + F11" tugmachalarini bosishingiz kerak.
  3. Keyinchalik, siz VBA muharririga muvaffaqiyatli kirasiz.
  4. Ushbu yangi oynada siz bo'sh modulni ochishingiz kerak, unda quyidagi VBA kodini ushbu modulga nusxalashingiz kerak.
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 kodi - muhim kiruvchi xatlarning birinchi sahifasini avtomatik chop etish

  1. Shundan so'ng siz joriy oynadan chiqishingiz mumkin.
  2. Keyin "Fayl" menyusiga o'ting va "Qoidalar va ogohlantirishlarni boshqarish" tugmasini bosing.
  3. Ochilgan "Qoidalar va ogohlantirishlar" dialog oynasida "Yangi qoida" tugmasini bosing.
  4. Keyin, "Qoidalar ustasi" ning yangi dialog oynasida "Men qabul qilgan xabarlarga qoidani qo'llash" -ni tanlang va "Keyingi" tugmasini bosing.
  5. "Qoidalar ustasi" ning ikkinchi ekranida siz shartlarni belgilashingiz kerak, ya'ni siz uchun qaysi elektron pochta xabarlari muhimligini aniqlashingiz kerak, masalan, ma'lum bir jo'natuvchilardan kelgan va hokazo.
  6. Shundan so'ng, "Keyingi" tugmasini bosing, bu sizni keyingi ekranga olib boradi, unda siz qoida harakatini o'rnatishingiz kerak bo'ladi. "Skriptni ishga tushirish" -ni tanlang va avval qo'shilgan makrosni tanlang.“Skriptni ishga tushirish” qoida amalini tanlang
  7. Keyinchalik, oxirgi ekran paydo bo'lgunga qadar bir nechta "Keyingi" tugmasini bosing - "Qoidani sozlashni tugatish" bunda siz ushbu qoida uchun nom belgilashingiz va qoida sozlamalarini yana bir bor tekshirishingiz mumkin.
  8. Nihoyat, ushbu yangi qoidani saqlash uchun “Finish” tugmasini bosing.
  9. Nihoyat, o'shandan beri, har safar pochta qutingizga yangi muhim kiruvchi xat kelganda, agar u juda uzun bo'lsa, Outlook o'zining birinchi sahifasini avtomatik ravishda chop etadi.

Buzilgan PST fayllaridan maksimal ma'lumotlarni ajratib oling

Ehtimol, siz Outlookning zaifligini tushungansiz. Bunday holatda, Outlook ma'lumotlaringizni himoya qilish uchun hech qanday tosh qoldirmasligingiz kerak. Biroq, ko'pincha, to'satdan yopilish tufayli Outlook ma'lumotlari buzilishi mumkinligini ko'rasiz. Shunday qilib, siz kutilmagan hodisalarga tayyorgarlik ko'rishingiz kerak Outlookning buzilishi, jumladan, muntazam PST zaxira nusxalari va kuchli tuzatish vositasi, masalan DataNumen Outlook Repair.

Muallif kirish:

Shirli Chjan ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc sql-ni tiklash va Outlook ta'mirlash dasturiy mahsulotlar. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com

Hozir ulashing:

Comments are closed.