Cách tự động in trang đầu tiên của các email đến quan trọng trong Outlook của bạn

Chia sẻ ngay bây giờ:

Một số người dùng muốn để Outlook tự động in các email đến quan trọng. Ngoài ra, nếu một email như vậy quá dài, để không tốn giấy, Outlook sẽ chỉ in trang đầu tiên. Bây giờ, trong bài viết này, chúng tôi sẽ trình bày cách hiện thực hóa nó theo chương trình.

Để in thủ công trang đầu tiên của một bức thư khá dễ dàng. Bạn chỉ có thể thay đổi các tùy chọn in trước khi in. Tuy nhiên, nếu bạn hy vọng rằng Outlook có thể tự động xác định độ dài của email và tự động in trang đầu tiên của một email rất dài, thì bạn phải tìm kiếm các phương tiện khác, chẳng hạn như cách sau.

Tự động in trang đầu tiên của các email đến quan trọng trong Outlook của bạn

Tự động in trang đầu tiên của các email đến quan trọng

  1. Để bắt đầu, bạn cần khởi chạy ứng dụng Outlook của mình như bình thường.
  2. Sau đó, trong cửa sổ Outlook chính, bạn cần nhấn phím “Alt + F11”.
  3. Sau đó, bạn sẽ truy cập thành công trình soạn thảo VBA.
  4. Trong cửa sổ mới này, bạn nên mở một mô-đun trống, trong đó bạn phải sao chép mã VBA sau vào mô-đun này.
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

Mã VBA - Tự động in trang đầu tiên của các email đến quan trọng

  1. Sau đó, bạn có thể thoát khỏi cửa sổ hiện tại.
  2. Sau đó vào menu “File” và nhấp vào nút “Manage Rules & Alerts”.
  3. Trong hộp thoại “Quy tắc và Cảnh báo” bật lên, nhấp vào nút “Quy tắc mới”.
  4. Tiếp theo, trong hộp thoại mới của “Rules Wizard”, chọn “Apply rule on messages I get” và nhấn “Next”.
  5. Trong màn hình thứ hai của “Trình hướng dẫn quy tắc”, bạn phải chỉ định các điều kiện, cụ thể là xác định email nào là quan trọng đối với bạn, chẳng hạn như đến từ những người gửi cụ thể, v.v.
  6. Sau đó, nhấp vào “Tiếp theo”, thao tác này sẽ đưa bạn đến màn hình tiếp theo, trong đó bạn sẽ cần đặt hành động quy tắc. Chọn “Chạy tập lệnh” và chọn macro đã thêm trước đó.Chọn hành động quy tắc “Chạy tập lệnh”
  7. Sau đó, nhấp vào một vài nút “Tiếp theo” cho đến khi nhận được màn hình cuối cùng – “Hoàn tất thiết lập quy tắc”, trong đó bạn có thể chỉ định tên cho quy tắc này và kiểm tra lại cài đặt quy tắc.
  8. Cuối cùng nhấp vào “Finish” để lưu quy tắc mới này.
  9. Cuối cùng, kể từ đó, mỗi khi có một email quan trọng mới đến vào hộp thư của bạn, Outlook sẽ tự động in trang đầu tiên nếu quá dài.

Trích xuất dữ liệu tối đa từ các tệp PST bị hỏng

Có lẽ bạn đã nhận ra lỗ hổng của Outlook. Trong trường hợp này, bạn không được bỏ qua bất cứ điều gì để bảo vệ dữ liệu Outlook của mình. Tuy nhiên, thường xuyên hơn không, bạn sẽ thấy rằng dữ liệu Outlook có thể bị hỏng chỉ do tắt đột ngột. Vì vậy, bạn phải chuẩn bị cho những tình huống bất ngờ Tham nhũng, bao gồm các bản sao lưu PST thông thường và một công cụ sửa lỗi mạnh mẽ, như DataNumen Outlook Repair.

Giới thiệu tác giả:

Shirley Zhang là một chuyên gia phục hồi dữ liệu trong DataNumen, Inc., công ty hàng đầu thế giới về công nghệ khôi phục dữ liệu, bao gồm phục hồi sql và các sản phẩm phần mềm sửa chữa triển vọng. Để biết thêm thông tin, hãy truy cập www.datanumennăm

Chia sẻ ngay bây giờ:

Được đóng lại.