Note: The other languages of the website are Google-translated. Back to English

Kako samodejno dodeliti barvno kategorijo sestankom, potem ko jih sprejmete v Outlooku?

Pri vsakodnevnem delu boste v Outlooku morda prejeli več e-poštnih sporočil o sestankih. Včasih želite sestankom samodejno dodeliti določeno barvno kategorijo, ko so sprejeti. Običajno jih lahko dodelite ročno, vendar pa bo težavno, če jih nastavite enega za drugim. V tem članku bom govoril o tem, kako to samodejno doseči v Outlooku.

Po sestankih samodejno dodeli barvno kategorijo, potem ko jih sprejmeš s kodo VBA


Po sestankih samodejno dodeli barvno kategorijo, potem ko jih sprejmeš s kodo VBA

1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. v Microsoft Visual Basic za aplikacije okno, dvokliknite Ta OutlookSession Iz Projekt1 (VbaProject.OTM) , da odprete način, nato pa v prazen modul kopirajte in prilepite naslednjo kodo.

Koda VBA: Samodejno dodeli barvno kategorijo sestankom, potem ko jih sprejmete

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 samodejno kategorizira sestanke 1

Opombe: V zgornji kodi lahko spremenite Rdeča kategorija na želeno ime kategorije barv.

3. Nato znova zaženite Outlook, da sproži ta makro.

4. Potem, ko sprejmete e-poštno sporočilo, kliknite Pošljite odgovor zdaj možnost, bo sprejeta seja naenkrat dodeljena določeni barvni kategoriji. Oglejte si posnetek zaslona:

doc samodejno kategorizira sestanke 2

Opombe: Ta koda se uporablja samo za privzeti podatkovni račun.


Kutools za Outlook - prinaša 100 naprednih funkcij v Outlook in olajša delo!

  • Samodejno CC / BCC po pravilih pri pošiljanju e-pošte; Samodejno posredovanje naprej Več e-poštnih sporočil po meri; Samodejni odgovor brez strežnika za izmenjavo in več samodejnih funkcij ...
  • Opozorilo pred BCC - prikaži sporočilo, ko poskušate odgovoriti vsem če je vaš poštni naslov na seznamu BCC; Opomni, ko manjkajo priloge, in več opomnikov ...
  • Odgovori (vsi) z vsemi prilogami v e-poštnem pogovoru; Odgovori na veliko e-poštnih sporočil v nekaj sekundah; Samodejno dodaj pozdrav ko odgovor; Dodaj datum v zadevo ...
  • Orodja za priloge: Upravljanje vseh prilog v vseh e-poštnih sporočilih, Samodejno loči, Stisni vse, Preimenuj vse, Shrani vse ... Hitro poročilo, Štejte izbrano pošto...
  • Zmogljiva neželena e-poštna sporočila po meri; Odstranite podvojene pošte in stike... Omogočajo vam pametnejše, hitrejše in boljše delovanje v Outlooku.
strelec kutools outlook kutools zavihek 1180x121
shot kutools outlook kutools plus jeziček 1180x121
 
Komentarji (0)
Ocene še ni. Bodite prvi in ​​ocenite!
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije