Sfat: alte limbi sunt traduse de Google. Puteți vizita English versiune a acestei legături.
Contul meu
x
or
x
x
Inregistreaza-te
x

or

Cum să acceptați automat solicitarea de întâlnire de la o anumită persoană în Outlook?

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

Auto acceptă solicitarea de întâlnire de la o persoană specifică cu codul VBA


Eliminați cu ușurință e-mailurile duplicat din directoarele de e-mail specificate simultan în Outlook:

Ștergeți E-mailuri duplicate utilitatea Kutools pentru Outlook vă poate ajuta să eliminați rapid toate e-mailurile duplicate dintr-un fișier de e-mail sau mai multe foldere specificate în același timp în Outlook. Vedeți captura de ecran:

Kutools pentru Outlook: cu mai mult de 40 la îndemână Outlook add-in-uri, liber să încercați fără limitări în 45 zile. Descărcați și încercați gratuit acum!


Auto acceptă solicitarea de întâlnire de la o persoană specifică cu codul VBA

Codul VBA de mai jos vă poate ajuta să acceptați automat solicitarea de întâlnire care a fost trimisă de la o anumită persoană din Outlook. Procedați după cum urmează.

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

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

Codul VBA: acceptă automat solicitarea 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 pe Alt + Q pentru a închide Microsoft Visual Basic pentru aplicații fereastră.

4. Reporniți Outlook pentru a lua 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 cererea de întâlnire trebuie să fie contul implicit din Outlook.


Legate de articole:



Kutools pentru Outlook

Mai mult decât funcțiile avansate 100 pentru Outlook 2010, 2013, 2016, 2019 și 365

ecran shot kutools pentru outlook minuscule pentru banner 201812

Mai multe caracteristici | Descărcare gratuită | Doar $ 39.00 pentru sute de funcții

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.