Jak automatycznie akceptować wezwanie na spotkanie od określonej osoby w Outlooku?
Otrzymując zaproszenie na spotkanie w Outlooku, musisz ręcznie zaakceptować wezwanie na spotkanie i wysłać odpowiedź do nadawcy. Czy istnieje łatwy sposób na automatyczne zaakceptowanie go od określonej osoby w Outlooku? Metoda opisana w tym artykule wyświadczy ci przysługę.
Automatycznie akceptuj wezwanie na spotkanie od określonej osoby z kodem VBA
Automatycznie akceptuj wezwanie na spotkanie od określonej osoby z kodem VBA
Poniższy kod VBA może pomóc w automatycznym zaakceptowaniu wezwania na spotkanie wysłanego od określonej osoby w Outlooku. Wykonaj następujące czynności.
1. wciśnij inny + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. w Microsoft Visual Basic for Applications kliknij dwukrotnie Ta sesja programu Outlook w lewym okienku, aby otworzyć okno Kod, a następnie skopiuj poniższy kod VBA do okna. Zobacz zrzut ekranu:
Kod VBA: Automatycznie akceptuj wezwanie na spotkanie od określonej osoby w Outlooku
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
Note: W kodzie proszę zastąpić „Nazwa nadawcy”Z wyświetlaną nazwą nadawcy.
3. Zapisz kod, a następnie naciśnij inny + Q klucze do zamknięcia Microsoft Visual Basic for Applications okno.
4. Uruchom ponownie program Outlook, aby zastosować ten efekt kodu.
Odtąd, po otrzymaniu wezwania na spotkanie wysłanego od osoby podanej w kodzie, spotkanie zostanie automatycznie zaakceptowane, a nadawca otrzyma również e-mail z odpowiedzią.
Note: Konto e-mail, które ma odbierać wezwanie na spotkanie, powinno być kontem domyślnym w programie Outlook.
Podobne artykuły:
- Jak odrzucić zaproszenie na spotkanie, ale nadal pozostawić je w kalendarzu w Outlooku?
- Jak odrzucić wszystkie przyszłe spotkania w programie Outlook?
Najlepsze narzędzia biurowe
Kutools dla programu Outlook - Ponad 100 zaawansowanych funkcji, które usprawnią Twoje perspektywy
🤖 Asystent poczty AI: Natychmiastowe profesjonalne e-maile z magią AI — genialne odpowiedzi jednym kliknięciem, doskonały ton, biegła znajomość wielu języków. Zmień e-mailing bez wysiłku! ...
📧 Automatyzacja poczty e-mail: Poza biurem (dostępne dla POP i IMAP) / Zaplanuj wysyłanie wiadomości e-mail / Automatyczne CC/BCC według reguł podczas wysyłania wiadomości e-mail / Automatyczne przewijanie (Zasady zaawansowane) / Automatyczne dodawanie powitania / Automatycznie dziel wiadomości e-mail od wielu odbiorców na pojedyncze wiadomości ...
📨 Zarządzanie e-mail: Łatwe przywoływanie e-maili / Blokuj oszukańcze wiadomości e-mail według tematów i innych / Usuń zduplikowane wiadomości e-mail / Wiecej opcji / Konsoliduj foldery ...
📁 Załączniki Pro: Zapisz zbiorczo / Odłącz partię / Kompresuj wsadowo / Automatyczne zapisywanie / Automatyczne odłączanie / Automatyczna kompresja ...
🌟 Magia interfejsu: 😊Więcej ładnych i fajnych emotikonów / Zwiększ produktywność programu Outlook dzięki widokom na kartach / Zminimalizuj program Outlook zamiast go zamykać ...
>> Cuda jednym kliknięciem: Odpowiedz wszystkim, dodając przychodzące załączniki / E-maile chroniące przed phishingiem / 🕘Pokaż strefę czasową nadawcy ...
👩🏼🤝👩🏻 Kontakty i kalendarz: Grupowe dodawanie kontaktów z wybranych e-maili / Podziel grupę kontaktów na pojedyncze grupy / Usuń przypomnienia o urodzinach ...
O Cechy 100 Poczekaj na eksplorację! Kliknij tutaj, aby dowiedzieć się więcej.