Näpunäide. Teised keeled on Google'i tõlgitud. Võite külastada English selle lingi versioon.
Logi sisse
x
or
x
x
Regist.
x

or

Kuidas automaatselt vastu võtta Outlooki konkreetsele isikule esitatavat nõupidamisteavet?

Kui saate koosolekukutse Outlookis, peate käsitsi vastu võtma koosolekukutse ja saatma vastuse saatjale. Kas on lihtsat võimalust selle automaatselt vastu võtta Outlooki konkreetsest isikust? Selles artiklis kasutatud meetod teeb teile eelist.

Automaatne VBA-koodi saatmine konkreetsele isikule vastava nõusoleku saamiseks


Eemaldage hõlpsalt Outlooki määratud e-posti kaust (id) duplikaadid:

Kustutama Duplicate emails kasulikkus Outlooki Kutools aitab teil kiirelt eemaldada kõik duplikaadid meililisest või mitme määratud kaustadest Outlookis samal ajal. Vaata pilti:

Outlooki Kutools: rohkem kui 40 käepärased Outlooki lisandmoodulid, mida saate tasuta proovida 45 päeva jooksul ilma piiranguteta. Laadige alla ja proovige kohe proovige nüüd!


Automaatne VBA-koodi saatmine konkreetsele isikule vastava nõusoleku saamiseks

Allpool olev VBA-kood aitab teil automaatselt vastu võtta koosoleku taotlust, mis saadetakse konkreetselt Outlooki isikult. Palun tehke järgmist.

1. Vajutage nuppu muu + F11 võtmed avada Microsoft Visual Basic rakenduste jaoks aken.

2. Aastal Microsoft Visual Basic rakenduste jaoks akna topeltklõps ThisOutlookSession vasakul paanil, et koodi aken avada, ja seejärel kopeeri akna all VBA koodi. Vaata pilti:

VBA-kood: automaatne Outlooki konkreetsele inimesele nõustumine

Public WithEvents GItems As Outlook.Items
'Updated by ExtendOffice 20180814
Private Sub Application_Startup()
    Set GItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub GItems_ItemAdd(ByVal Item As Object)
Dim xMtRequest As MeetingItem
Dim xAppointmentItem As AppointmentItem
Dim xMtResponse As MeetingItem
If Item.Class = olMeetingRequest Then
    Set xMtRequest = Item
    Set xAppointmentItem = xMtRequest.GetAssociatedAppointment(True)
    If xAppointmentItem.GetOrganizer.Name = "Sender Name" Then
        With xAppointmentItem
            .ReminderMinutesBeforeStart = 45
            .Categories = "Orange Category"
            .Save
        End With
        Set xMtResponse = xAppointmentItem.Respond(olMeetingAccepted)
        xMtResponse.Send
        xMtRequest.Delete
    End If
End If
End Sub

märkused: Koodis, palun asenda "Saatja nimi"Koos saatja kuvatava nimega.

3. Salvestage kood ja vajutage seejärel nuppu muu + Q sulgemiseks võtmed Microsoft Visual Basic rakenduste jaoks aken.

4. Selle koodi efekti võtmiseks taaskäivitage Outlook.

Alates sellest hetkest, kui koodi määratud isikult saadetud koosoleku taotluste vastuvõtmine, võetakse koosolek automaatselt vastu ja saatja saab ka vastava e-kirja.

märkused: Koosolekukutse saaja e-posti konto peaks olema Outlooki vaikimisi konto.


Teemaga seotud artiklid:

Soovitatavad tööriistad

tulistas kutoolsi väljavaade kutools tab 1180x121
tulistas kutoolsi väljavaated kutools pluss kaart 1180x121

Kutools Outlookile - rohkem kui 100-i lisafunktsioonid Outlookile, 70-i efektiivsuse parandamine Teie jaoks

  • Keerulisi ja korduvaid toiminguid saab teha ühekordse töötlemise sekundites.
  • Edasta mitu e-kirja ükshaaval ühe nupuvajutusega ja automaatse edastamise reeglitega.
  • Automaatne CC / BCC iga e-posti saatmine ja reeglite kohandamine ning automaatne vastus ilma vahetusserverita.
  • Võimas junk-e-kirjade filter, eemaldage korduvad e-kirjad, vastatakse manustega, ühe klõpsuga operatsioonide hulk jne.
  • 60-päeva piiramatu tasuta prooviperiood. 60-päeva raha tagasi garantii. 2 aastat tasuta uuendada ja toetada. Osta üks kord, kasuta igavesti.
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.