Tips: Andra språk är Google-översatta. Du kan besöka English version av den här länken.
Logga in
x
or
x
x
Registrera
x

or

Hur accepterar man automatiskt mötesförfrågan från en viss person i Outlook?

När du mottar mötesinbjudan i Outlook måste du manuellt godkänna mötesförfrågan och skicka svaret till avsändaren. Finns det något enkelt sätt att automatiskt acceptera det från en viss person i Outlook? Metoden i den här artikeln kommer att göra dig till tjänst.

Auto acceptera mötesförfrågan från en specifik person med VBA-kod


Ta enkelt bort dubbla e-postmeddelanden från angivna e-postmappar i en gång i Outlook:

Radera Kopiera e-postmeddelanden nytta av Kutools för Outlook kan hjälpa dig att snabbt ta bort alla dubbla e-postmeddelanden från en e-postfoder eller flera angivna mappar samtidigt i Outlook. Se skärmdump:

Kutools för Outlook: med mer än 40 användbara Outlook-tillägg, gratis att prova utan begränsning i 45 dagar. Ladda ner och gratis test nu!


Auto acceptera mötesförfrågan från en specifik person med VBA-kod

Nedanstående VBA-kod kan hjälpa dig att automatiskt acceptera mötesförfrågan som skickats från en viss person i Outlook. Gör så här som följer.

1. tryck på andra + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer fönster, dubbelklicka ThisOutlookSession i den vänstra rutan för att öppna kodfönstret och sedan kopiera under VBA-kod i fönstret. Se skärmdump:

VBA-kod: Automatisk acceptera mötesförfrågan från en specifik 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

Anmärkningar: I koden, ersätt "Avsändare Namn"Med avsändarens visningsnamn.

3. Spara koden och tryck sedan på andra + Q nycklar för att stänga Microsoft Visual Basic för applikationer fönster.

4. Starta om Outlook för att ta denna kodseffekt.

Från och med nu när mötesförfrågningar skickas från den person du angav i koden accepteras mötet automatiskt och avsändaren får också ett svarmeddelande.

Anmärkningar: Det e-postkonto som mottar mötesförfrågan bör vara standardkontot i din Outlook.


Relaterade artiklar:

Rekommenderade produktivitetsverktyg

skott kutools outlook kutools fliken 1180x121
skott kutools outlook kutools plus flik 1180x121

Kutools för Outlook - Mer än 100 Avancerade funktioner för Outlook, förbättra 70% effektivitet för dig

  • Komplicerade och upprepade operationer kan göras en engångsbehandling i sekunder.
  • Vidarebefordra flera e-postmeddelanden individuellt med ett klick och automatiskt vidarebefordra genom regler.
  • Auto CC / BCC varje skickande e-post och lätt för anpassning av regler och automatisk svar utan att kräva utbytesserver.
  • Kraftfull skräppostfilter, ta bort dubbla e-postmeddelanden, svara med bifogade filer, en massa klickoperationer och så vidare ...
  • 60-dagen obegränsad gratis provperiod. 60-dagars pengarna tillbaka garanti. 2 års gratis uppgradering och support. Köp en gång, använd alltid.
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.