Nếu bạn muốn nhanh chóng nhận được số lượng tệp đính kèm trong mỗi email trong danh sách email, bạn có thể sử dụng mã VBA trong bài viết này. Nó sẽ tự động đếm các tệp đính kèm trong mỗi email đến và hiển thị số lượng trong một cột mới.
Một số người dùng thường xuyên cần đếm các tệp đính kèm email. Trong trường hợp này, tại sao không tạo và bật một cột dành riêng để hiển thị số lượng tệp đính kèm? Trong phần tiếp theo, chúng tôi sẽ hướng dẫn bạn cách làm cho Outlook tự động đếm các tệp đính kèm email và hiển thị số lượng trong một cột mới như vậy.

Hiển thị số lượng tệp đính kèm trong danh sách email
- Trước tiên, hãy mở ứng dụng Outlook của bạn.
- Sau đó nhấn các nút phím “Alt + F11” trong cửa sổ chính của Outlook.
- Tiếp theo, trong cửa sổ soạn thảo Outlook VBA mới, bạn cần mở một mô-đun không được sử dụng.
- Sau đó, sao chép và dán mã VBA sau vào mô-đun này.
Sub AutoCountAttachments(objMail As Outlook.MailItem)
Dim objAttachments As Outlook.Attachments
Dim objProperties As Outlook.UserProperties
Dim objProperty As Outlook.UserProperty
Dim strPropertyName As String
Set objAttachments = objMail.Attachments
strPropertyName = "Attachment Count"
Set objProperties = objMail.UserProperties
'Check if there is already a column in this name
Set objProperty = objProperties.Find(strPropertyName, True)
If objProperty Is Nothing Then
'If not, add this column
Set objProperty = objProperties.Add(strPropertyName, olText, True)
End If
'Set the column value equal to the count of attachments
objProperty.value = objAttachments.Count
objMail.Save
End Sub
- Sau đó, bạn có thể thoát khỏi cửa sổ “Microsoft Visual Basic for Applications” hiện tại.
- Sau đó, bạn cần tạo quy tắc mới để chạy tập lệnh này trên mọi email đến.
- Đầu tiên, hãy chuyển đến menu “Tệp” và nhấp vào nút “Quản lý quy tắc & cảnh báo” trong tab “Thông tin”.
- Sau đó, trong hộp thoại mới, nhấn nút “Quy tắc mới”.
- Trong màn hình “Trình hướng dẫn quy tắc” tiếp theo, hãy chọn “Áp dụng quy tắc cho các thư tôi nhận được” và nhấn “Tiếp theo”.
- Tiếp theo, bỏ qua “Chọn điều kiện” và nhấp vào “Tiếp theo”.
- Sau đó, chọn hành động “chạy tập lệnh” và chọn macro đã thêm trước đó, giống như ảnh chụp màn hình sau.
- Sau đó, nhấp vài lần vào “Tiếp theo” cho đến khi đến màn hình “Hoàn tất thiết lập quy tắc” cuối cùng.
- Sau đó, bạn cần chỉ định tên mới cho quy tắc này và bật tùy chọn “Chạy quy tắc này trên các thư đã có trong “Hộp thư đến” và 'Bật quy tắc này'.
- Cuối cùng, bấm vào nút “Finish”.
- Sau đó, bạn nên thêm cột “Số lượng tệp đính kèm” được tạo bởi mã VBA. Chỉ cần thực hiện các bước sau đây:
- Trước tiên, hãy chuyển đến tab “Xem” trong màn hình danh sách email.
- Sau đó nhấp vào nút "Xem cài đặt".
- Trong hộp thoại mới bật lên, nhấn nút “Cột”.
- Sau đó, trong cửa sổ “Hiển thị cột”, hãy tìm và chọn cột “Số lượng tệp đính kèm” trong “Cột do người dùng xác định trong Hộp thư đến” và nhấn nút “Thêm”.
- Cuối cùng nhấn nút “OK” để lưu thay đổi.
- Cuối cùng, bạn có thể thấy cột "Số lượng tệp đính kèm" trong danh sách email đang hiển thị số lượng tệp đính kèm cho mỗi email, được hiển thị như hình ảnh bên dưới:
Tránh thất vọng mất dữ liệu PST
Người ta tin rằng không ai sẵn sàng chấp nhận mất dữ liệu PST. Điều tương tự cũng đúng với bạn. Do đó, bạn phải thực hiện một số biện pháp phòng ngừa, chẳng hạn như tạo bản sao lưu dữ liệu cho tệp PST của mình và sử dụng một công cụ sửa lỗi có uy tín như DataNumen Outlook Repair. Nó có thể sửa chữa triển vọng các vấn đề mà không đổ mồ hôi.
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 sửa lỗ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




