Cách thay đổi hàng loạt thời gian nhắc nhở của nhiều cuộc hẹn với Outlook VBA

Chia sẻ ngay bây giờ:

Nếu bạn thường xuyên cần thay đổi thời gian nhắc nhở của nhiều cuộc hẹn thì bài viết này sẽ rất hữu ích cho bạn. Phương pháp ở đây sẽ giúp bạn tiết kiệm hiệu quả khỏi việc thay đổi thời gian nhắc nhở theo cách thủ công từng cái một.

Bài báo trước – “3 bước để tạo và thay đổi lời nhắc cho các mục lịch theo lô” đã chia sẻ một phương pháp để thay đổi hàng loạt thời gian nhắc nhở của nhiều cuộc hẹn. Tuy nhiên, trước tiên nó vẫn yêu cầu bạn thay đổi cài đặt chế độ xem và sau đó thay đổi lời nhắc của một cuộc hẹn theo cách thủ công. Vì vậy, sau đây chúng tôi sẽ giới thiệu cho bạn một cách hiệu quả hơn rất nhiều. Ở đây chúng tôi sẽ hiển thị các bước chi tiết và mã VBA cụ thể. Do đó, bạn không cần phải lo lắng về việc không có kiến ​​thức về VBA. Chỉ cần đọc trên.

Thay đổi hàng loạt thời gian nhắc nhở của nhiều cuộc hẹn

  1. Trước tiên, hãy mở chương trình Outlook.
  2. Sau đó, truy cập trình chỉnh sửa VBA có tham chiếu đến “Cách chạy mã VBA trong Outlook của bạn".
  3. Tiếp theo, sao chép và dán mã VBA sau vào một mô-đun không sử dụng.
Sub BatchChangeRemindersMultipleAppointments()
 Dim lReminderMinBeforeStart As Long
 Dim objSelection As Outlook.Selection
 Dim i As Long
 Dim objAppointment As Outlook.AppointmentItem
 
 'Enter the number of minutes the reminder should occur prior to the start of the appointment
 lReminderMinBeforeStart = InputBox("Enter the reminder minutes before start:", , "45")
 
 Set objSelection = Outlook.ActiveExplorer.Selection
 
 For i = objSelection.Count To 1 Step -1
 If TypeOf objSelection.Item(i) Is AppointmentItem Then
 Set objAppointment = objSelection.Item(i)
 
 'Enable the reminder
 If objAppointment.ReminderSet = False Then
 With objAppointment
 .ReminderSet = True
 .Save
 End With
 End If
 
 With objAppointment
 .ReminderMinutesBeforeStart = lReminderMinBeforeStart
 .Save
 End With
 End If
 Next
 
 'Prompt you of "Complete"
 MsgBox "Complete!", vbInformation + vbOKOnly
End Sub

Mã VBA - Thay đổi hàng loạt thời gian nhắc nhở của nhiều cuộc hẹn

  1. Sau đó, thêm macro này vào ribbon hoặc Quick Access Toolbar.
  2. Cuối cùng, bạn có thể thử nó.
  • Để bắt đầu, hãy chọn các cuộc hẹn mà bạn muốn.
  • Sau đó, nhấp vào nút macro.Chạy Macro trên các cuộc hẹn đã chọn
  • Tiếp theo, trong hộp thoại bật lên, nhập số phút nhắc nhở trước khi cuộc hẹn bắt đầu.Nhập số phút nhắc nhở trước khi mục bắt đầu.
  • Bây giờ, bạn có thể kiểm tra thời gian nhắc nhở của các cuộc hẹn đã chọn, đã được sửa đổi theo mong muốn của bạn.Đã thay đổi thời gian nhắc nhở

Loại bỏ lỗi Outlook

Nếu bạn thường xuyên gặp phải các lỗi linh tinh trong Outlook, bạn nên thực hiện một số biện pháp mạnh mẽ. Chẳng hạn, bạn cần sao lưu tệp Outlook PST của mình cùng một lúc, quét tệp để tìm vi-rút và diệt chúng, tìm hiểu cách sử dụng hiệu quả Scanpst để sửa PST vấn đề và nắm giữ một công cụ sửa chữa bên ngoài, chẳng hạn như DataNumen Outlook Repair. Nó sẽ có ích khi bạn gặp phải các sự cố rắc rối mà công cụ sửa hộp thư đến không thể xử lý đượ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 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.