Cum să redirecționați automat invitațiile la întâlniri către o anumită persoană din Outlook?
În Outlook, puteți redirecționa direct o invitație la întâlnire către o anumită persoană utilizând funcția Redirecționare manual. Dar, uneori, este posibil să fie nevoie să redirecționați automat întâlnirile către o anumită persoană când acceptați întâlnirea. În acest articol, voi vorbi despre cum să redirecționați automat o invitație la întâlnire către o persoană cât mai repede posibil.
Redirecționează invitațiile de întâlnire către o anumită persoană în mod automat în Outlook cu cod VBA
Iată un cod VBA util care vă poate ajuta să redirecționați automat invitația la întâlnire către o anumită persoană după ce ați acceptat-o, vă rugăm să procedați astfel:
1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. În Microsoft Visual Basic pentru aplicații fereastră, faceți dublu clic Această sesiune Outlook de la Project1 (VbaProject.OTM) pentru a deschide modul, apoi copiați și lipiți următorul cod în modulul gol.
Cod VBA: Întâlniri de redirecționare automată către o anumită persoană:
Public WithEvents ReceivedItems As Outlook.Items
Private Sub Application_Startup()
Set ReceivedItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub ReceivedItems_ItemAdd(ByVal Item As Object)
Dim xMeetingItem As MeetingItem
Dim xMeetingResponse As MeetingItem
Dim xForwardMeeting As MeetingItem
Dim xAppointmentItem As AppointmentItem
On Error Resume Next
If TypeOf Item Is MeetingItem Then
Set xMeetingItem = Item
Set xAppointmentItem = xMeetingItem.GetAssociatedAppointment(True)
Set xMeetingResponse = xAppointmentItem.Respond(olMeetingAccepted, True)
xMeetingResponse.Send
Set xForwardMeeting = xMeetingItem.Forward
With xForwardMeeting
With .Recipients
.Add "" 'change address to your own
.ResolveAll
End With
.Send
End With
End If
End Sub
notițe: În codul de mai sus, ar trebui să schimbați adresa destinatarului cu a dvs.
3. Apoi salvați codul și reporniți Outlook pentru a obține efectul de cod.
4. Acum, când primiți o invitație la întâlnire, întâlnirea va fi acceptată automat și, în același timp, această întâlnire va fi redirecționată automat către persoana dvs. specifică imediat.
notițe: Acest cod este disponibil numai pentru contul implicit.
Cele mai bune instrumente de productivitate de birou
Kutools pentru Outlook - Peste 100 de funcții puternice pentru a vă supraalimenta Outlook
🤖 AI Mail Assistant: E-mailuri profesionale instantanee cu magie AI--un singur clic pentru răspunsuri geniale, ton perfect, stăpânire în mai multe limbi. Transformați e-mailurile fără efort! ...
📧 Automatizare e-mail: În afara biroului (disponibil pentru POP și IMAP) / Programați trimiterea de e-mailuri / CC/BCC automat după reguli la trimiterea e-mailului / Redirecționare automată (Reguli avansate) / Adăugare automată felicitare / Împărțiți automat e-mailurile cu mai mulți destinatari în mesaje individuale ...
📨 Managementul e-mail: Amintește-ți cu ușurință e-mailurile / Blocați e-mailurile înșelătorii de către subiecți și alții / Ștergeți e-mailurile duplicate / Cautare Avansata / Consolidați foldere ...
📁 Atașamente Pro: Salvați în serie / Detașare lot / Compresă în loturi / Salvare automata / Detașare automată / Comprimare automată ...
🌟 Magia interfeței: 😊Mai multe emoji drăguțe și cool / Îmbunătățiți-vă productivitatea Outlook cu vizualizările cu file / Minimizați Outlook în loc să închideți ...
???? Minuni cu un singur clic: Răspundeți tuturor cu atașamentele primite / E-mailuri anti-phishing / 🕘Afișați fusul orar al expeditorului ...
👩🏼🤝👩🏻 Contacte și calendar: Adăugați în lot contacte din e-mailurile selectate / Împărțiți un grup de contact în grupuri individuale / Eliminați mementouri de ziua de naștere ...
Peste 100 Caracteristici Așteaptă explorarea ta! Click aici pentru a descoperi mai multe.
