Kako samodejno sprejeti zahtevo za sestanek določene osebe v programu Outlook?

Ko prejmete vabilo na sestanek v Outlooku, morate ročno sprejeti zahtevo za sestanek in odgovor poslati pošiljatelju. Ali obstaja preprost način, da ga samodejno sprejmete od določene osebe v programu Outlook? Metoda v tem članku vam bo naredila uslugo.

Samodejno sprejme zahtevo za sestanek določene osebe s kodo VBA

Samodejno sprejme zahtevo za sestanek določene osebe s kodo VBA

Spodnja koda VBA vam lahko pomaga samodejno sprejeti zahtevo za sestanek, poslano od določene osebe v programu Outlook. Naredite naslednje.

1. Pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, dvokliknite Ta OutlookSession v levem podoknu, da odprete okno Code, in nato v okno kopirajte pod kodo VBA. Oglejte si posnetek zaslona:

Koda VBA: Samodejno sprejme zahtevo za sestanek določene osebe v programu Outlook

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

Opombe: V kodi zamenjajte »Ime pošiljatelja"S prikaznim imenom pošiljatelja.

3. Shranite kodo in pritisnite tipko druga + Q tipke za zapiranje Microsoft Visual Basic za aplikacije okno.

4. Znova zaženite Outlook, da začne učinkovati s to kodo.

Od zdaj naprej bo seja, ko bo prejemala zahteve za sestanke, poslane od osebe, ki ste jo navedli v kodi, samodejno sprejeta, pošiljatelj pa bo prejel tudi odgovor po e-pošti.

Opombe: E-poštni račun, ki prejema zahtevo za sestanek, mora biti privzeti račun v Outlooku.

Sorodni članki:

• Kako zavrniti povabilo na sestanek, vendar ga še vedno pustiti na koledarju v Outlooku?
• Kako zavrniti vsa prihodnja srečanja v Outlooku?