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.

Muhim kiruvchi xatlarning birinchi sahifasini avtomatik chop etish
- Boshlash uchun Outlook ilovasini odatdagidek ishga tushirishingiz kerak.
- Keyin asosiy Outlook oynasida "Alt + F11" tugmachalarini bosishingiz kerak.
- Keyinchalik, siz VBA muharririga muvaffaqiyatli kirasiz.
- 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
- Shundan so'ng siz joriy oynadan chiqishingiz mumkin.
- Keyin "Fayl" menyusiga o'ting va "Qoidalar va ogohlantirishlarni boshqarish" tugmasini bosing.
- Ochilgan "Qoidalar va ogohlantirishlar" dialog oynasida "Yangi qoida" tugmasini bosing.
- Keyin, "Qoidalar ustasi" ning yangi dialog oynasida "Men qabul qilgan xabarlarga qoidani qo'llash" -ni tanlang va "Keyingi" tugmasini bosing.
- "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.
- 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.
- 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.
- Nihoyat, ushbu yangi qoidani saqlash uchun “Finish” tugmasini bosing.
- 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

