VBA, чтобы изменить чувствительность элемента задания - PullRequest
Новая
       13

VBA, чтобы изменить чувствительность элемента задания

0 голосов
/ 29 мая 2019

Я пытаюсь изменить чувствительность задачи к частной, если ей присвоена определенная категория в Outlook.

У меня работает код, если я открою Задачу, задаю категорию и сохраняю и закрываю. Он не меняет чувствительность, когда я меняю категорию, не открывая задание.

Как мне изменить код, чтобы он работал правильно? 


Public Sub Initialize_handler()
    Set OlItems = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderTasks).Items
End Sub

Private Sub OlItems_ItemChange(ByVal Item As Object)

If Item.Categories = "Test" Then Item.Sensitivity = olPrivate Else Item.Sensitivity = olNormal

End Sub
...