Cum se acceptă automat cererea de întâlnire de la o anumită persoană din Outlook?

Când primiți invitația la întâlnire în Outlook, trebuie să acceptați manual cererea de întâlnire și să trimiteți răspunsul către expeditor. Există vreo modalitate ușoară de a o accepta automat de la o anumită persoană din Outlook? Metoda din acest articol vă va face o favoare.

Acceptă automat cererea de întâlnire de la o anumită persoană cu cod VBA

Acceptă automat cererea de întâlnire de la o anumită persoană cu cod VBA

Codul VBA de mai jos vă poate ajuta să acceptați în mod automat cererea de întâlnire trimisă de la o anumită persoană din Outlook. Vă rugăm să faceți următoarele.

1. apasă pe Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți dublu clic Această sesiune Outlook în panoul din stânga pentru a deschide fereastra Cod, apoi copiați sub codul VBA în fereastră. Vedeți captura de ecran:

Cod VBA: acceptă automat cererea de întâlnire de la o anumită persoană din 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

notițe: În cod, înlocuiți „Numele expeditorului”Cu numele afișat al expeditorului.

3. Salvați codul, apoi apăsați tasta Alt + Q tastele pentru a închide Microsoft Visual Basic pentru aplicații fereastră.

4. Reporniți Outlook pentru a obține acest efect de cod.

De acum înainte, când primiți solicitări de întâlnire trimise de persoana pe care ați specificat-o în cod, întâlnirea va fi acceptată automat, iar expeditorul va primi și un e-mail de răspuns.

notițe: Contul de e-mail care primește solicitarea de întâlnire ar trebui să fie contul implicit în Outlook.

Legate de articole:

• Cum să refuzați o invitație la întâlnire, dar să o lăsați în calendar în Outlook?
• Cum să refuzați toate întâlnirile de apariție viitoare din Outlook?

---

Cele mai bune instrumente de productivitate de birou

Kutools pentru Outlook - Peste 100 de funcții puternice pentru a vă supraalimenta Outlook

🤖 AI Mail Assistant: E-mailuri profesionale instantanee cu magie AI--un singur clic pentru răspunsuri geniale, ton perfect, stăpânire în mai multe limbi. Transformați e-mailurile fără efort! ...

📧 Automatizare e-mail: În afara biroului (disponibil pentru POP și IMAP)  /  Programați trimiterea de e-mailuri  /  CC/BCC automat după reguli la trimiterea e-mailului  /  Redirecționare automată (Reguli avansate)   /  Adăugare automată felicitare   /  Împărțiți automat e-mailurile cu mai mulți destinatari în mesaje individuale ...

📨 Managementul e-mail: Amintește-ți cu ușurință e-mailurile  /  Blocați e-mailurile înșelătorii de către subiecți și alții  /  Ștergeți e-mailurile duplicate  /  Cautare Avansata  /  Consolidați foldere ...

📁 Atașamente Pro: Salvați în serie  /  Detașare lot  /  Compresă în loturi  /  Salvare automata   /  Detașare automată  /  Comprimare automată ...

🌟 Magia interfeței: 😊Mai multe emoji drăguțe și cool   /  Îmbunătățiți-vă productivitatea Outlook cu vizualizările cu file  /  Minimizați Outlook în loc să închideți ...

???? Minuni cu un singur clic: Răspundeți tuturor cu atașamentele primite  /   E-mailuri anti-phishing  /  🕘Afișați fusul orar al expeditorului ...

👩🏼‍🤝‍👩🏻 Contacte și calendar: Adăugați în lot contacte din e-mailurile selectate  /  Împărțiți un grup de contact în grupuri individuale  /  Eliminați mementouri de ziua de naștere ...

Peste 100 Caracteristici Așteaptă explorarea ta! Click aici pentru a descoperi mai multe.

Citeste mai mult       Descărcare gratuită      Cumpărare