Cách tự động tạo tác vụ bất cứ khi nào một danh mục cụ thể được gán cho một email trong Outlook

giải pháp triển vọng Tháng Chín 29, 2025

Bài viết này sẽ hướng dẫn bạn cách tự động tạo tác vụ mới khi bạn chỉ định một danh mục màu cụ thể cho email bằng Outlook VBA.

Trước đây, khi tôi nhận được một email liên quan đến một nhiệm vụ, tôi thường chỉ định danh mục “Nhiệm vụ” cho email này và tiến hành tạo một nhiệm vụ mới có liên quan. Thành thật mà nói, quá trình này thực sự tốn thời gian. Tôi phải viết ra tất cả các thông tin trước, vì những chi tiết này phải được yêu cầu trong nhiệm vụ mới. Nhưng giờ đây, với sự trợ giúp của VBA, Outlook có thể tự động tạo tác vụ mới bất cứ khi nào tôi chỉ định danh mục “Nhiệm vụ” cho email. Nếu bạn quan tâm đến mẹo này, hãy đọc tiếp để hiểu chi tiết về chúng.

Tự động tạo một nhiệm vụ bất cứ khi nào một danh mục cụ thể được gán cho một email

Trước tiên, hãy mở Outlook và chuyển sang tab “Nhà phát triển”.
Trên tab này, bạn có thể tìm và nhấp vào nút “Visual Basic”.
Sau đó, một cửa sổ mới “Microsoft Visual Basic for Applications” sẽ mở ra. Trong đó, bạn nên nhấp đúp chuột vào dự án “ThisOutlookSession”.
Tiếp theo, bạn nên sao chép các mã VBA sau vào cửa sổ dự án “ThisOutlookSession”.

Public WithEvents OlItems As Outlook.Items

Sub Application_Startup()
    Set OlItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub

Sub OlItems_ItemChange(ByVal Item As Object)
    Dim obApp As Application
    Dim olTask As TaskItem

    If Item.Class = olMail And Item.Categories = "Task" Then
       Set obApp = Outlook.Application
       Set olTask = obApp.CreateItem(olTaskItem)
       With olTask
            .Subject = Item.Subject
            .Body = Item.Body
            .Attachments.Add Item
            .StartDate = Now
            .DueDate = Now + 3
            .Save
            .Display
       End With
    End If
 
    'To clear the category
    'If you want to keep the category, remove the following four lines
    With Item
         .Categories = ""
         .Save
    End With
 
    Set obApp = Nothing
    Set olTask = Nothing
End Sub

Sau đó, bạn sẽ được yêu cầu ký mã này. Bạn có thể sử dụng tiện ích tích hợp sẵn của Office – “Chứng chỉ kỹ thuật số cho các dự án VBA” để đạt được điều đó. Để biết thêm các bước chi tiết, bạn có thể tham khảo Bước 2 trong bài viết này “2 bước để tự động đánh dấu email rác là đã đọc trong Outlook".
Sau đó, để ngăn chặn macro độc hại bên ngoài, bạn nên chuyển sang “Trung tâm tin cậy” và thay đổi cài đặt macro để chỉ bật macro được ký điện tử.
Cuối cùng bạn có thể có một thử.

Quảng cáo chiêu hàng trên một mục thư và chỉ định một danh mục cụ thể cho mục đó, giống như ảnh chụp màn hình sau:
Ngay lập tức, một tác vụ mới sẽ được tạo tự động và được hiển thị trong cửa sổ bật lên mới.

Giữ các tab trên Macro độc hại trong các email bị nghi ngờ

Điều cực kỳ quan trọng là phải chặn tất cả các macro chưa được ký bên ngoài, vì chúng có thể chứa vi-rút hoặc phần mềm độc hại, có thể làm hỏng dữ liệu Outlook của bạn một cách dễ dàng. Vì vậy, người dùng nên chú ý đến các email đi kèm với macro. Ngoài ra, rất nên đầu tư vào một công cụ sửa dữ liệu Outlook bị hỏng, Giống như DataNumen Outlook Repair. Nó có thể giải cứu bạn khi bạn gặp phải sự cố Outlook không lường trước được.

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 mdf 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