Outlook e-poçtunu çap edərkən daxil edilmiş şəkilləri necə istisna etmək olar

Bəzən siz sadəcə olaraq daxil edilmiş şəkilləri daxil etmədən e-poçtun mətnini çap etmək istəyə bilərsiniz. Çap etməzdən əvvəl şəkilləri silmək əvəzinə, bu məqalədə təqdim olunan üsulu tətbiq edə bilərsiniz. Çap edərkən şəkilləri avtomatik istisna edə bilər.

Hamımızın bildiyi kimi, şəkillərin çapı mürəkkəb israfıdır. Buna görə də, bəzən e-poçtu çap edərkən, daxil edilmiş şəkillərin faydasız olduğunu düşünə bilərsiniz. Beləliklə, e-poçtu çap edərkən şəkilləri istisna etmək istəyə bilərsiniz. Bu vəziyyətdə, asanlıqla əldə etmək üçün aşağıdakı üsuldan istifadə edə bilərsiniz.

E-poçtu Çap edərkən Daxili Şəkilləri Xaric edin

1. Əvvəlcə Outlook proqramını işə salın.
2. Sonra, məqaləyə uyğun olaraq Outlook VBA redaktoruna daxil olun - "Outlook-da VBA kodunu necə işlətmək olar".
3. Daha sonra, "MS Word Obyekt Kitabxanası"na müraciət edə biləcəyiniz "MS Word Obyekt Kitabxanası"nı aktivləşdirməlisiniz.VBA-da Obyekt Kitabxanasına İstinad necə əlavə olunur".
4. Bundan sonra, aşağıdakı VBA kodunu istifadə olunmamış modula qoyun.

Sub ExcludeEmebeddedImagesWhenPrintingEmail()
    Dim objMail As Outlook.MailItem
    Dim strMailDocument As String
    Dim objWordApp As Word.Application
    Dim objMailDocument As Word.Document
    Dim objInlineShape As Word.InlineShape
 
    'Get the source email
    Select Case Application.ActiveWindow.Class
           Case olInspector
                Set objMail = ActiveInspector.CurrentItem
           Case olExplorer
                Set objMail = ActiveExplorer.Selection.Item(1)
    End Select
 
    'Save the email as a Word document
    strMailDocument = Environ("Temp") & "\" & objMail.Subject & ".doc"
    objMail.SaveAs strMailDocument, olDoc
 
    'Remove the embedded images from the document
    Set objWordApp = CreateObject("Word.Application")
    Set objMailDocument = objWordApp.Documents.Open(strMailDocument)
    objWordApp.Visible = True
    For Each objInlineShape In objMailDocument.InlineShapes
        objInlineShape.Delete
    Next
 
    'Print out the document
    objMailDocument.PrintOut
 
    objMailDocument.Close
    objWordApp.Quit
    Kill strMailDocument
End Sub

5. Daha sonra cari “Proqramlar üçün Microsoft Visual Basic” pəncərəsini bağlayın.
6. Bundan sonra, Tez Giriş Alətlər Panelinə yeni makro əlavə edin.
7. Nəhayət, indi bu makronu sınaya bilərsiniz.

• Başlamaq üçün mənbə e-poçtunu seçin və ya açın.
• Sonra, Tez Giriş Alətlər Panelində makro düyməsini basın.
• E-poçt dərhal aşağıdakı ekran görüntüsünə bənzəyən daxili şəkillər olmadan çap olunacaq:

Outlook məlumatlarınızı effektiv şəkildə qoruyun

İndiki vaxtda məlumatlar həmişə etibarsızdır, çünki hardware nasazlıqları, proqram xətaları, virus infeksiyası və s. kimi potensial risklər çoxdur. Eyni şey Outlook məlumatlarınız üçün də keçərlidir. Beləliklə, Outlook məlumatlarınızı qorumaq üçün səy göstərməlisiniz. Məsələn, müntəzəm PST ehtiyat nüsxələrini çıxarmalısınız. Bundan əlavə, necə istifadə edəcəyinizi öyrənməlisiniz scanpst Outlook faylını təmir etmək üçün. Nəhayət, güclü xarici təmir alətinin hazırlanması da zərurət məsələsidir, məsələn DataNumen Outlook Repair.

Müəllif Giriş:

Shirley Zhang məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc mdf bərpa edin və Outlook təmiri proqram məhsulları. Ətraflı məlumat üçün ziyarət edin www.datanumen.com