Patarimas: kitos kalbos yra "Google" išverstos. Galite aplankyti English šios nuorodos versija.
Prisijungti
x
or
x
x
Registruotis
x

or

Kaip automatiškai priskirti spalvų kategoriją susirinkimams, kai juos priimsite "Outlook"?

Savo kasdieniniame darbe "Outlook" galite gauti kelis susitikimų el. Laiškus. Kartais norėdami priskirti tam tikrą spalvų grupę susitikimams automatiškai, kai jos priimamos. Paprastai juos galite priskirti rankiniu būdu, tačiau tai bus varginantis juos nustatyti vienas po kito. Šiame straipsnyje aš kalbėsiu apie tai, kaip automatiškai jį pasiekti "Outlook".

Automatiškai priskirti spalvų kategoriją susitikimams, kai juos priimsite su VBA kodu


Automatiškai priskirti spalvų kategoriją susitikimams, kai juos priimsite su VBA kodu

1. Laikykite nuspaudę ALT + F11 raktus atidaryti "Microsoft Visual Basic for Applications" langas.

2. Be "Microsoft Visual Basic for Applications" langas, dukart spustelėkite ThisOutlookSession nuo Project1 (VbaProject.OTM) kad atidarytumėte režimą, tada nukopijuokite ir įklijuokite šį kodą į tuščią modulį.

VBA kodas: automatiškai priskirkite spalvų kategoriją susirinkimams po jų priėmimo

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 automatiškai suskirstyti susitikimus 1

pastabos: Į pirmiau nurodytą kodą galite keisti Raudona kategorija į norimą spalvų kategorijos pavadinimą.

3. Ir tada iš naujo paleiskite Outlook, kad suaktyvintumėte šią makrokomandą.

4. Tada, priėmę susitikimo el. Laišką ir spustelėkite Siųsti atsakymą dabar pasirinkimas, konkreti spalvų kategorija bus priskirta priimtam susitikimui iš karto. Žr. Ekrano kopiją:

doc automatiškai suskirstyti susitikimus 2

pastabos: Šis kodas taikomas tik numatytąją duomenų sąskaitą.



Kutools for Outlook

Daugiau nei 100 papildomos funkcijos „Outlook 2010“, „2013“, „2016“, „2019“ ir „365“

ekrano fotografavimas „kutools“, skirtas „201812“ banerio perspektyvai

Daugiau funkcijų | Nemokamas atsisiuntimas | Tik šimtai funkcijų - $ 39.00

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.