Khi chuyển tiếp email Outlook có tệp đính kèm, đôi khi, bạn có thể chỉ muốn giữ lại các tệp đính kèm đã chọn thay vì tất cả. Bây giờ, trong bài viết này, chúng tôi sẽ hướng dẫn bạn cách nhanh chóng chuyển tiếp thư chỉ với các tệp đính kèm đã chọn.
Theo cách tiêu chuẩn, khi bạn chuyển tiếp email Outlook, tất cả các tệp đính kèm ban đầu sẽ được chuyển tiếp. Tuy nhiên, đôi khi bạn chỉ muốn chuyển tiếp một số tệp đính kèm thay vì tất cả. Nói chung, bạn có thể chuyển tiếp email như bình thường và sau đó xóa các tệp đính kèm không mong muốn theo cách thủ công. Nhưng, nó là một chút rắc rối. Do đó, ở đây chúng tôi sẽ giới thiệu cho bạn một phương pháp nhanh hơn nhiều để chuyển tiếp email chỉ với các tệp đính kèm được chọn.
Chuyển tiếp nhanh email chỉ với các tệp đính kèm được chọn
- Ngay từ đầu, hãy khởi chạy trình soạn thảo Outlook VBA thông qua phím tắt “Alt + F11”.
- Sau đó, sao chép và dán đoạn mã sau vào một dự án hoặc mô-đun.
Sub ForwardMailWithSelectedAttachmentsOnly()
Dim objMail As Outlook.MailItem
Dim strTempFolder As String
Dim strFile As String
Dim objSelectedAttachments As Outlook.AttachmentSelection
Dim objAttachment As Outlook.Attachment
Dim objForward As Outlook.MailItem
'Get the selected email
Set objMail = Outlook.Application.ActiveExplorer.Selection.Item(1)
'Get the selected attachments
Set objSelectedAttachments = Outlook.Application.ActiveExplorer.AttachmentSelection
If objSelectedAttachments.Count > 0 Then
'Forward this email
Set objForward = objMail.Forward
objForward.Display
'Delete all the forwarded attachments
Do Until objForward.Attachments.Count = 0
objForward.Attachments.Item(1).Delete
Loop
On Error Resume Next
strTempFolder = "E:\Temp" & Format(Now, "yyymmddhhmmss") & "\"
MkDir (strTempFolder)
'Re-attach the selected attachments to the forward mail
For Each objAttachment In objSelectedAttachments
strFile = strTempFolder & objAttachment.FileName
objAttachment.SaveAsFile (strFile)
objForward.Attachments.Add (strFile)
Next
Kill strFile
End If
End Sub
- Tiếp theo, thoát khỏi trình soạn thảo VBA.
- Sau đó, hãy làm theo “Bước tùy chọn” trong phần trướcost "Cách chạy mã VBA trong Outlook của bạn” để thêm macro này vào thanh công cụ truy nhập nhanh hoặc dải băng.
- Cuối cùng, bạn có thể thử macro này.
- Trước hết, hãy đảm bảo rằng khung đọc đã được bật.
- Sau đó, chọn một email và các tệp đính kèm mà bạn muốn chuyển tiếp.
- Tiếp theo, bấm vào nút macro trong Thanh công cụ truy cập nhanh hoặc ruy-băng.
- Ngay lập tức, một email mới sẽ hiển thị. Như bạn có thể thấy, đó là một email chuyển tiếp chỉ có các tệp đính kèm được chọn.
Khắc phục tham nhũng dữ liệu Outlook Knotty
Bạn đã bao giờ gặp sự cố Outlook chưa? Và những sự cố như vậy có dẫn đến hỏng dữ liệu PST không? Nếu bạn đã từng gặp phải những vấn đề như vậy, bạn có thể nhận ra chúng phức tạp và rắc rối như thế nào. Thông thường, các sự cố nhỏ có thể được giải quyết bằng công cụ sửa chữa Hộp thư đến. Nhưng, đối với những rắc rối nghiêm trọng, như Tham nhũng, bạn phải sử dụng một tiện ích mạnh mẽ hơn, chẳng hạn 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 SQL Server sửa chữa 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