Outlook kuralları oluşturduktan sonra, bunları şu anda çalıştırmak istemiyor ancak belirli bir zamanda başlatmayı umuyorsanız, bu makalede tanıtılan yaklaşımı uygulayabilirsiniz.
Outlook kuralı oluşturmayı bitirdiğinizde, "bu kuralı şimdi çalıştır" seçeneğini seçmeniz gerekecektir. Etkinleştirirseniz, kural çalışmaya başlayacak ve Outlook'unuz çalıştığı sürece sürekli olarak çalışmaya devam edecektir. Ancak etkinleştirmezseniz, bu kuralı manuel olarak çalıştırmanız gerekir. Bununla birlikte, birçok kullanıcı kuralların hemen değil, belirli zamanlarda otomatik olarak çalışmasını ister. Bu gereksinim için, Outlook'un böyle bir yerleşik işlev sunmadığı açıktır. Bu nedenle, başka yollar aramanız gerekir. Burada, belirli bir hatırlatıcıya sahip bir görev öğesi ve Outlook VBA'yı kullanan bir püf noktası öğreteceğiz.
Belirli Outlook Kurallarını Belirli Bir Zamanda Çalıştırılacak Şekilde Zamanlayın
- En başta, Outlook programınızı başlatın.
- Ardından, varsayılan Görev klasörünüze gidin.
- Ardından, aşağıdaki ekran görüntüsü gibi belirli hatırlatıcılara sahip görevler oluşturmanız gerekir. Ek olarak, bu adımda bazı notlar verilmiştir.
- İlk olarak, oluşturulacak görevlerin sayısı, belirli zamanlarda çalıştırmanız gereken kurallara bağlıdır.
- İkincisi, hatırlatma süreleri, belirli kuralların çalışacağı belirli zamanları ifade eder. Bu nedenle hatırlatma zamanını belirlerken dikkatli olun.
- Üçüncüsü, yinelenen bir modelde belirli kurallar çalıştırmak istiyorsanız, görevlere karşılık gelen bir yineleme eklemeniz gerekir.
- Yeni görevler oluşturmayı tamamladıktan sonra “Alt + F11” tuşlarına basabilirsiniz.
- Ardından, Outlook VBA editör penceresine gireceksiniz.
- Bu noktada sol taraftaki “ThisOutlookSession” projesine çift tıklamanız gerekiyor.
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 projesini imzalamanız gerekir.
- Daha sonra, yalnızca dijital olarak imzalanmış makroları etkinleştirmek için makro ayarlarınızı değiştirmelisiniz.
- Bundan sonra, belirli bir görevin hatırlatıcısı açıldığında, belirli bir kural otomatik olarak çalışacak ve çalışacaktır. Belirli kurallar başarıyla çalıştırıldıktan sonra aşağıdaki resimdeki gibi mesajlar alabilirsiniz.
Nadir Görülen Görünüm Sorunlarıyla Başa Çıkın
Outlook hataya açık olduğundan, Outlook veri koruması için çok çaba harcamanız gerekecek. Bu nedenle, saygın ve kanıtlanmış bir ürün hazırlamak akıllıca olacaktır. Outlook düzeltmesi araç, örneğin DataNumen Outlook Repair. Ciddi Outlook sorunları yaşadığınızda çok yardımcı olacaktır.
Yazar Tanıtımı:
Shirley Zhang, bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. düzeltmek SQL Server ve görünüm onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com