Savjet: drugi jezici su prevedeni na Google. Možete posjetiti English verzija ove veze.
Prijava
x
or
x
x
Registracija
x

or

Kako automatski prihvatiti zahtjev za sastanak od određene osobe u programu Outlook?

Kada primite pozivnicu za sastanak u programu Outlook, morate ručno prihvatiti zahtjev za sastanak i poslati odgovor pošiljatelju. Postoji li neki jednostavan način da ga automatski prihvati od određene osobe u programu Outlook? Metoda u ovom članku učinit će vam uslugu.

Automatski prihvaća zahtjev za sastanak od određene osobe s VBA kodom


Jednostavno uklonite duple poruke e-pošte iz određene mape e-pošte u jednom trenutku u programu Outlook:

Brisanje Duplikat e-pošte korisnost Kutools za Outlook može vam pomoći da brzo uklonite sve duple poruke e-pošte iz e-pošte ili više navedenih mapa istovremeno u programu Outlook. Pogledajte snimak zaslona:

Kutools za Outlook: s više od 40 zgodnih dodataka za Outlook, slobodno možete isprobati bez ograničenja u 45 danima. Preuzmite i besplatno testiranje odmah!


Automatski prihvaća zahtjev za sastanak od određene osobe s VBA kodom

Dolje VBA kôd vam može pomoći da automatski prihvatite zahtjev za sastanak koji je poslan od određene osobe u programu Outlook. Učinite sljedeće.

1. pritisni drugo + F11 tipke za otvaranje Microsoft Visual Basic for Applications prozor.

2. U Microsoft Visual Basic for Applications prozor, dvaput klik ThisOutlookSession u lijevom oknu da biste otvorili prozor Kod, a zatim kopirajte ispod VBA koda u prozor. Pogledajte snimak zaslona:

VBA kod: Automatski prihvaća zahtjev za sastanak od određene osobe u 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

bilješke: U kodu zamijenite "Ime pošiljatelja"S naznakom za prikaz pošiljatelja.

3. Spremite kôd, a zatim pritisnite gumb drugo + Q tipke za zatvaranje Microsoft Visual Basic for Applications prozor.

4. Ponovo pokrenite Outlook da biste uzeli taj efekt koda.

Odsad, kada primite zahtjeve za sastanke poslane od osobe koju ste naveli u kodu, sastanak će biti automatski prihvaćen, a pošiljatelj će dobiti i e-poštu s odgovorom.

bilješke: Račun e-pošte koji prima zahtjev za sastanak trebao bi biti zadani račun u programu Outlook.


Povezani članci:



Kutools za Outlook

Više od 100 naprednih funkcija za Outlook 2010, 2013, 2016, 2019 i 365

zaslon pucao kutools za Outlook mali za banner 201812

Dodatne mogućnosti | Besplatno preuzimanje | Samo $ 39.00 za stotine funkcija

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.