Khi bạn thay đổi ngày bắt đầu của một tác vụ trong Outlook, theo mặc định, ngày đến hạn của tác vụ đó cũng sẽ tự động được thay đổi. Nếu bạn không muốn điều này, bạn có thể sử dụng một trong hai phương pháp được giới thiệu trong bài viết này.
Có lẽ bạn đã nhận thấy rằng ngày đến hạn của nhiệm vụ Outlook sẽ thay đổi tùy thuộc vào ngày bắt đầu. Cụ thể hơn, khi bạn thay đổi ngày bắt đầu của một nhiệm vụ, ngày đến hạn của nó cũng sẽ thay đổi. Tuy nhiên, nhiều người dùng muốn giữ nguyên ngày đến hạn ngay cả khi ngày bắt đầu thay đổi. Vì vậy, ở đây chúng tôi sẽ trình bày 2 cách.
Cách 1: Sử dụng phím “Shift”
- Trước tiên, hãy mở ứng dụng Outlook như bình thường.
- Sau đó chuyển sang khu vực “Nhiệm vụ”.
- Tiếp theo, chọn và mở một tác vụ bằng cách nhấp đúp vào tác vụ đó.
- Sau đó, trong cửa sổ Tác vụ tiếp theo, bạn nên nhấp vào mũi tên xuống của trường “Ngày đến hạn”.
- Trong cửa sổ bật lên "Chọn ngày", bạn cần giữ phím "Shift" và đồng thời nhấp vào ngày bạn muốn sử dụng làm Ngày bắt đầu mới.
- Sau khi chọn ngày theo cách trên, bạn sẽ thấy trường “Ngày bắt đầu” đã được thay đổi thành ngày mới.
- Cuối cùng, bạn có thể lưu tác vụ này bằng cách nhấn nút “Lưu & Đóng”.
Theo cách này, mỗi khi bạn muốn giữ nguyên ngày đến hạn khi thay đổi ngày bắt đầu, bạn phải nhấn phím “Shift”. Điều này có thể hơi rắc rối. Vì vậy, ở đây chúng tôi sẽ hướng dẫn bạn một cách khác hiệu quả hơn.
Phương pháp 2: Áp dụng Outlook VBA
- Trước tiên, trên màn hình chính của Outlook, nhấn tổ hợp phím “Alt + F11”.
- Trong cửa sổ “Microsoft Visual Basic for Applications” tiếp theo, bạn có thể tìm và mở dự án “ThisOutlookSession”.
- Tiếp theo, bạn nên sao chép mã VBA sau vào dự án này.
Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objTask As Outlook.TaskItem
Public dStartdate, dDueDate As Date
Private Sub Application_Startup()
Set objInspectors = Outlook.Application.Inspectors
End Sub
Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
If Inspector.CurrentItem.Class = olTask Then
Set objTask = Inspector.CurrentItem
dStartdate = objTask.StartDate
dDueDate = objTask.DueDate
End If
End Sub
Private Sub objTask_PropertyChange(ByVal Name As String)
If Name = "StartDate" Then
If objTask.StartDate <> dStartdate And objTask.StartDate <= dDueDate And objTask.StartDate <> #1/1/4501# Then
objTask.DueDate = dDueDate
objTask.Save
End If
End If
End Sub
- Sau đó, bạn nên ký điện tử mã này.
- Sau đó, bạn nên thay đổi cài đặt macro Outlook của mình để bật các dự án VBA đã ký.
- Cuối cùng, bạn có thể khởi động lại Outlook để kích hoạt macro mới.
- Từ nay trở đi, mỗi khi bạn thay đổi ngày bắt đầu của nhiệm vụ, ngày đến hạn sẽ không thay đổi.
Cứu các tệp PST bị xâm phạm
Như chúng ta đã biết, Outlook dễ bị hỏng. May mắn thay, Outlook được trang bị một công cụ sửa chữa sẵn có – scanpst. Tuy nhiên, thành thật mà nói, trong nhiều trường hợp, nó không thể tạo ra hiệu ứng. Do đó, một công cụ sửa lỗi của bên thứ ba có chất lượng tốt và có kinh nghiệm là vấn đề cần thiết, 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 phục hồi 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