Outlook VBA ilə çoxlu görüşlərin xatırlatma vaxtını necə toplu dəyişdirmək olar

İndi paylaş:

Əgər siz tez-tez bir neçə görüş üçün xatırlatma vaxtını dəyişdirməyə ehtiyac duyarsanız, bu məqalə sizin üçün çox faydalı olacaq. Buradakı üsul sizi xatırlatma vaxtını bir-bir əl ilə dəyişməkdən effektiv şəkildə xilas edəcək.

Əvvəlki məqalə - "Dəstələrdə Təqvim Elementləri üçün Xatırlatmalar Yaratmaq və Dəyişmək üçün 3 Addım” bir çox görüşlərin öyüd-nəsihət vaxtını kütləvi şəkildə dəyişdirmək üçün bir üsul paylaşdı. Bununla belə, o, sizdən əvvəlcə görünüş parametrlərini dəyişdirməyinizi və sonra bir görüşün xatırladıcısını əl ilə dəyişdirməyinizi tələb edir. Buna görə də burada sizə daha təsirli bir üsul təqdim edəcəyik. Burada ətraflı addımları və konkret VBA kodunu göstərəcəyik. Beləliklə, VBA haqqında heç bir məlumatınız olmadığından narahat olmaq lazım deyil. Sadəcə oxu.

Partiya Çoxlu Görüşlərin Xatırlatma Vaxtını dəyişdirin

  1. Ən başında, Outlook proqramını başladın.
  2. Sonra "VBA redaktoruna daxil olun"Outlook-da VBA kodunu necə işlətmək olar".
  3. Sonra, aşağıdakı VBA kodunu istifadə olunmamış modula köçürün və yapışdırın.
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

VBA Kodu - Çoxlu görüşlərin xatırlatma vaxtını toplu olaraq dəyişdirin

  1. Bundan sonra, bu makronu lentə və ya Tez Giriş Alətlər Panelinə əlavə edin.
  2. Nəhayət, cəhd edə bilərsiniz.
  • Başlamaq üçün istədiyiniz görüşləri seçin.
  • Sonra, makro düyməsini basın.Seçilmiş Randevularda Makronu işə salın
  • Növbəti addım olaraq, açılan informasiya qutusunda, görüş başlamazdan əvvəl xatırlatma dəqiqələrinin sayını daxil edin.Elementin Başlamazdan Bir neçə Dəqiqə əvvəl Xatırlatma Daxil Edin
  • İndi siz istəyinizə uyğun olaraq dəyişdirilmiş seçilmiş görüşlərin xatırlatma vaxtını yoxlaya bilərsiniz.Xatırlatma vaxtı dəyişdirildi

Outlook səhvlərini aradan qaldırın

Outlook-da tez-tez müxtəlif səhvlərlə qarşılaşırsınızsa, bir sıra sağlam tədbirlər görməlisiniz. Məsələn, siz dərhal Outlook PST faylınızın ehtiyat nüsxəsini çıxarmalı, faylı viruslara qarşı skan etməli və onları öldürməli, Scanpst-dən effektiv şəkildə istifadə etməyi öyrənməlisiniz. PST-ni düzəldin kimi xarici düzəltmə alətini əldə edin DataNumen Outlook Repair. Gələnlər qutusunun təmiri vasitəsi ilə öhdəsindən gələ bilməyən problemli problemlərlə qarşılaşdığınız zaman bu faydalı olacaq.

Müəllif Girişi:

Shirley Zhang məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc sql düzəliş və Outlook təmiri proqram məhsulları. Ətraflı məlumat üçün ziyarət edin www.datanumen.com

İndi paylaş:

Şərhlər bağlıdır.