Bəzi Outlook qaydaları yaratdıqdan sonra, onları indi işə salmaq istəmirsinizsə, amma müəyyən bir vaxtda başlatmaq istəyirsinizsə, bu məqalədə təqdim olunan yanaşmanı tətbiq edə bilərsiniz.
Outlook qaydasını yazmağı bitirdikdən sonra "bu qaydanı indi işlədib-işlətməməyi" seçməyiniz tələb olunacaq. Onu aktivləşdirsəniz, qayda Outlook işlədiyi müddətcə işləməyə başlayacaq və daim işləyəcək. Lakin onu aktivləşdirməsəniz, bu qaydanı əl ilə işlətməlisiniz. Bununla belə, bir çox istifadəçi qaydaların avtomatik olaraq indi deyil, müəyyən vaxtlarda işləməsini istəyir. Bu tələb üçün Outlook-un belə bir doğma funksiya təklif etmədiyi aydındır. Buna görə də, başqa vasitələr axtarmalısınız. Burada sizə müəyyən bir xatırlatma və Outlook VBA ilə tapşırıq elementindən istifadə edəcək bir hiylə öyrədəcəyik.
Xüsusi Outlook Qaydalarını Müəyyən Vaxtda İşlətmək üçün Planlaşdırın
- Ən başlanğıcda Outlook proqramını işə salın.
- Sonra standart Tapşırıq qovluğuna keçin.
- Sonra aşağıdakı ekran görüntüsü kimi xüsusi xatırlatmalarla tapşırıqlar yaratmalısınız. Bundan əlavə, bu addımda bəzi qeydlər var.
- Birincisi, yaradılacaq tapşırıqların sayı müəyyən vaxtlarda yerinə yetirməli olduğunuz qaydalardan asılıdır.
- İkincisi, xatırlatma vaxtları xüsusi qaydaların işləyəcəyi xüsusi vaxtlara aiddir. Odur ki, xatırlatma vaxtını təyin edərkən diqqətli olun.
- Üçüncüsü, təkrarlanan nümunədə xüsusi qaydaları işlətmək istəyirsinizsə, tapşırıqlara müvafiq təkrarlanma əlavə etməlisiniz.
- Yeni tapşırıqların yaradılmasını tamamladıqdan sonra “Alt + F11” düymələrini sıxa bilərsiniz.
- Daha sonra Outlook VBA redaktoru pəncərəsinə daxil olacaqsınız.
- Bu nöqtədə, sol tərəfdəki "ThisOutlookSession" layihəsinə iki dəfə klik etməlisiniz.
Public Sub Application_Reminder(ByVal Item As Object)
Dim objRules As Outlook.Rules
Dim objRule As Outlook.Rule
Set objRules = Outlook.Application.Session.DefaultStore.GetRules
If TypeOf Item Is TaskItem Then
'Refer to the subject of the specific task item
If Item.Subject = "Rule: Move Items" Then
'The corresponding specific rule
Set objRule = objRules.Item("Move Specific Items")
With objRule
.Enabled = True
.Execute ShowProgress:=True, Folder:=Session.GetDefaultFolder(olFolderInbox), IncludeSubfolders:=True
End With
MsgBox ("Move Successfully!")
ElseIf Item.Subject = "Rule: Forward Items" Then
Set objRule = objRules.Item("Forward Specific Items")
With objRule
.Enabled = True
.Execute ShowProgress:=True, Folder:=Session.GetDefaultFolder(olFolderInbox), IncludeSubfolders:=True
End With
MsgBox ("Forward Successfully!")
'You can add more as per your needs
End If
objRules.Save
End If
End Sub
- Bundan sonra yeni VBA layihəsinə imza atmalısınız.
- Daha sonra yalnız rəqəmsal imzalanmış makroları aktivləşdirmək üçün makro parametrlərinizi dəyişdirməlisiniz.
- Bundan sonra, xüsusi tapşırığın xatırladıcısı görünəndə, xüsusi qayda avtomatik olaraq işləyəcək və işləyəcək. Xüsusi qaydalar uğurla icra edildikdən sonra aşağıdakı şəkildəki kimi mesajlar ala bilərsiniz.
Bəzən Outlook Problemləri ilə məşğul olun
Outlook səhvlərə meylli olduğundan, Outlook məlumatlarının qorunması üçün çox səy sərf etməli olacaqsınız. Beləliklə, nüfuzlu və sübut edilmiş bir insan hazırlamaq məqsədəuyğundur Outlook düzəlişi kimi alət DataNumen Outlook Repair. Ciddi Outlook problemlərindən əziyyət çəkəndə çox kömək edəcək.
Müəllif Giriş:
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 düzeltmek SQL Server və Outlook təmiri proqram məhsulları. Ətraflı məlumat üçün ziyarət edin www.datanumen.com