Outlook'ta kabul ettikten sonra toplantılara otomatik olarak renk kategorisi nasıl atanır?

Günlük çalışmanızda, Outlook'ta birden çok toplantı e-postası alabilirsiniz. Bazen, kabul edildiklerinde toplantılara otomatik olarak belirli bir renk kategorisi atamak istersiniz. Normalde bunları manuel olarak atayabilirsiniz, ancak bunları tek tek ayarlamak zahmetli olacaktır. Bu yazıda, bunu Outlook'ta otomatik olarak nasıl gerçekleştireceğimi anlatacağım.

VBA kodu ile kabul ettikten sonra toplantılara otomatik olarak renk kategorisi atayın

VBA kodu ile kabul ettikten sonra toplantılara otomatik olarak renk kategorisi atayın

1. Basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. In Uygulamalar için Microsoft Visual Basic pencere, çift tıklama Bu OutlookOturumu itibaren Proje1 (VbaProject.OTM) bölmesini açın ve ardından aşağıdaki kodu kopyalayıp boş modüle yapıştırın.

VBA kodu: Kabul ettikten sonra toplantılara otomatik renk kategorisi atayın

Public WithEvents SentItems As Outlook.Items
Private Sub Application_Startup()
    Set SentItems = Outlook.Application.Session.GetDefaultFolder(olFolderSentMail).Items
End Sub
Private Sub SentItems_ItemAdd(ByVal Item As Object)
Dim xMeetingItem As Outlook.MeetingItem
Dim xMeetingItemAccepted As Outlook.MeetingItem
Dim xAppointmentItem As Outlook.AppointmentItem
On Error Resume Next
If TypeOf Item Is MeetingItem Then
    Set xMeetingItem = Item
    If InStr(xMeetingItem.Subject, "Accepted:") = 1 Then
        Set xMeetingItemAccepted = xMeetingItem
        Set xAppointmentItem = xMeetingItemAccepted.GetAssociatedAppointment(True)
        With xAppointmentItem
            .Categories = .Categories & "Red Category"
            .Save
        End With
    End If
End If
End Sub

doc toplantıları otomatik kategorilere ayır 1

not: Yukarıdaki kodda değiştirebilirsiniz. Kırmızı Kategori istediğiniz renk kategorisi adına.

3. Ardından, bu makroyu tetiklemek için Outlook'unuzu yeniden başlatın.

4. Ardından, toplantı e-postasını kabul ettikten sonra ve Yanıtı Şimdi Gönderin seçeneği, belirli renk kategorisi kabul edilen toplantıya bir defada atanacaktır. Ekran görüntüsüne bakın:

doc toplantıları otomatik kategorilere ayır 2