Vihje: Muut kielet ovat Google-käännettyjä. Voit vierailla English tämän linkin versio.
Kirjaudu
x
or
x
x
Rekis.
x

or

Kuinka automaattisesti hyväksyä tietyn henkilön Outlook-kokouspyynnön?

Kun vastaanotat kokouskutsun Outlookissa, sinun on hyväksyttävä kokouspyyntö manuaalisesti ja lähetettävä vastaus lähettäjälle. Onko olemassa helppo tapa hyväksyä se tietyltä henkilöltä Outlookissa? Tämän artikkelin menetelmä auttaa sinua.

Hyväksy automaattinen kokouspyyntö tietystä VBA-koodin omaavasta henkilöstä


Voit poistaa helposti kopioidut sähköpostit tietystä sähköpostikansioista heti Outlookissa:

Poista Kopioi sähköpostit hyödyllisyys Kutools for Outlook voi auttaa sinua poistamaan kaikki kahtena sähköposteja sähköpostiviivasta tai useista määritetyistä kansioista samanaikaisesti Outlookissa. Katso kuvakaappaus:

Kutools for Outlook: enemmän kuin 40 kätevä Outlook-apuohjelmat, voit kokeilla rajoituksia 45-päivinä. Lataa ja kokeile nyt!


Hyväksy automaattinen kokouspyyntö tietystä VBA-koodin omaavasta henkilöstä

VBA-koodin alla voi auttaa hyväksymään automaattisesti Outlook-tietyltä henkilöltä lähetetyn kokouspyynnön. Tee näin seuraavasti.

1. paina muut + F11 avaimet avaamaan Microsoft Visual Basic for Applications ikkunassa.

2. Vuonna Microsoft Visual Basic for Applications ikkuna, kaksoisnapsauta ThisOutlookSession avaa Code-ikkuna vasemmanpuoleisessa ruudussa ja kopioi sen jälkeen VBA-koodi alla olevaan ikkunaan. Katso kuvakaappaus:

VBA-koodi: Hyväksy automaattisen kokouspyynnön tietyltä henkilöltä Outlookissa

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

Huomautuksia: Korvaa koodi "Lähettäjän nimi"Lähettäjän näyttönimeä käyttäen.

3. Tallenna koodi ja paina sitten muut + Q avaimet sulkea Microsoft Visual Basic for Applications ikkunassa.

4. Käynnistä Outlook uudelleen tämän koodin vaikutuksen ottamiseksi.

Tällöin vastaanottaessasi koodin mukaisesta henkilöltä lähetetyt kokouspyynnöt kokous hyväksytään automaattisesti ja lähettäjä vastaanottaa myös vastaavan sähköpostiviestin.

Huomautuksia: Kokouspyynnön vastaanottaneen sähköpostitilin tulee olla Outlook-oletustili.


Aiheeseen liittyviä artikkeleita:

Suositeltavat tuottavuustyökalut

ampui kutools outlook kutools -välilehti 1180x121
ampui kutools outlook kutools plus -välilehti 1180x121

Kutools for Outlook - Enemmän kuin 100-lisätoimintoja Outlookille, Paranna 70% -tehokkuutta sinulle

  • Monimutkaiset ja toistuvat toiminnot voidaan tehdä kerran kerralla.
  • Välitä useita sähköpostiviestejä yksitellen yhdellä napsautuksella ja automaattinen eteenpäin sääntöjen mukaisesti.
  • Automaattinen CC / BCC-lähetys ja helppo muokata sääntöjä ja automaattinen vastaus ilman vaihtopalvelinta.
  • Tehokas roskapostisuodatin, poista päällekkäiset sähköpostit, vastaa liitteineen, yhdellä napsautuksella toimitetut toiminnot ja niin edelleen ...
  • 60-päivän rajoittamaton ilmainen kokeilu. 60-päivän rahat takaisin-takuu. 2 vuotta ilmaiseksi päivittää ja tukea. Osta kerran, käytä ikuisesti.
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.