Note: The other languages of the website are Google-translated. Back to English

Hvordan accepterer man automatisk mødeindkaldelse fra en bestemt person i Outlook?

Når du modtager mødeinvitation i Outlook, skal du manuelt acceptere mødeanmodningen og sende svaret til afsenderen. Er der nogen nem måde at automatisk acceptere det fra en bestemt person i Outlook? Metoden i denne artikel vil gøre dig en tjeneste.

Accepter automatisk mødeindkaldelse fra specifik person med VBA-kode


Accepter automatisk mødeindkaldelse fra specifik person med VBA-kode

Nedenstående VBA-kode kan hjælpe dig med automatisk at acceptere mødeanmodning, der sendes fra en bestemt person i Outlook. Gør som følger.

1. Tryk på andre + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

2. i Microsoft Visual Basic til applikationer dobbeltklik på vinduet Denne OutlookSession i venstre rude for at åbne kodevinduet og derefter kopiere nedenunder VBA-koden ind i vinduet. Se skærmbillede:

VBA-kode: Accepter automatisk mødeindkaldelse fra en bestemt person i 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

Bemærk: I koden skal du udskifte “Afsender navn”Med afsenderens displaynavn.

3. Gem koden, og tryk derefter på andre + Q taster for at lukke Microsoft Visual Basic til applikationer vindue.

4. Genstart Outlook for at få denne kodeeffekt.

Fra nu af, når der modtages mødeindkaldelser sendt fra den person, du har angivet i koden, vil mødet blive accepteret automatisk, og afsenderen modtager også en svar-e-mail.

Bemærk: Den e-mail-konto, der modtager mødeindkaldelsen, skal være standardkontoen i din Outlook.


Relaterede artikler:


Kutools til Outlook - bringer 100 avancerede funktioner til Outlook, og gør arbejdet meget nemmere!

  • Auto CC / BCC ved regler, når du sender e-mail; Automatisk videresendelse Flere e-mails efter brugerdefineret; Auto svar uden udvekslingsserver og flere automatiske funktioner ...
  • BCC Advarsel - vis besked, når du prøver at besvare alle hvis din e-mail-adresse er på BCC-listen; Påmind, når du mangler vedhæftede filer, og mere minder funktioner ...
  • Svar (alle) med alle vedhæftede filer i mailsamtalen; Besvar mange e-mails på få sekunder Tilføj automatisk hilsen når svar Tilføj dato til emne ...
  • Vedhæftningsværktøjer: Administrer alle vedhæftede filer i alle mails, Automatisk afmontering, Komprimer alle, Omdøb alt, Gem alle ... Hurtig rapport, Tæl valgte mails...
  • Kraftige uønskede e-mails efter skik; Fjern duplikerede mails og kontakter... Gør dig i stand til at gøre smartere, hurtigere og bedre i Outlook.
shot kutools outlook kutools fane 1180x121
shot kutools outlook kutools plus fane 1180x121