Skip i'r prif gynnwys

Sut i anfon ymlaen cyfarfod yn gwahodd rhywun penodol yn Outlook? 

Yn Outlook, gallwch anfon gwahoddiad cyfarfod at berson penodol yn uniongyrchol trwy ddefnyddio'r nodwedd Ymlaen â llaw. Ond, weithiau, efallai y bydd angen i chi anfon y gwahoddiadau cyfarfod ymlaen at berson penodol yn awtomatig pan fyddwch chi'n derbyn y cyfarfod. Yr erthygl hon, byddaf yn siarad am sut i anfon cyfarfod ymlaen i wahodd person i berson cyn gynted ag y gallwch.

Mae cyfarfod ymlaen yn gwahodd rhywun penodol yn awtomatig yn Outlook gyda chod VBA


Mae cyfarfod ymlaen yn gwahodd rhywun penodol yn awtomatig yn Outlook gyda chod VBA

Dyma god VBA defnyddiol a all eich helpu chi i anfon y cyfarfod ymlaen at berson penodol ar ôl ei dderbyn, gwnewch fel hyn:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch ddwywaith SesiwnOutlook oddi wrth y Prosiect1 (VbaProject.OTM) cwarel i agor y modd, ac yna copïo a gludo'r cod canlynol i'r modiwl gwag.

Cod VBA: Mae cyfarfod ymlaen llaw yn gwahodd rhywun penodol:

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

Nodyn: Yn y cod uchod, dylech newid cyfeiriad y derbynnydd i'ch un chi.

cyfarfod ymlaen auto doc 1

3. Yna arbedwch y cod, ac ailgychwynwch yr Outlook i gael yr effaith cod.

4. Nawr, pan fyddwch chi'n derbyn gwahoddiad cyfarfod, bydd y cyfarfod yn cael ei dderbyn yn awtomatig, ac ar yr un pryd, bydd y cyfarfod hwn yn cael ei anfon ymlaen yn awtomatig i'ch person penodol ar unwaith.

Nodyn: Mae'r cod hwn ar gael i'r cyfrif diofyn yn unig.


Offer Cynhyrchiant Swyddfa Gorau

Kutools ar gyfer Rhagolwg - Dros 100 o Nodweddion Pwerus i Werthu Eich Outlook

🤖 Cynorthwy-ydd Post AI: E-byst pro ar unwaith gyda hud AI - un clic i atebion athrylith, tôn berffaith, meistrolaeth amlieithog. Trawsnewid e-bostio yn ddiymdrech! ...

📧 E-bostio Automation: Allan o'r Swyddfa (Ar gael ar gyfer POP ac IMAP)  /  Amserlen Anfon E-byst  /  Auto CC/BCC gan Reolau Wrth Anfon E-bost  /  Awto Ymlaen (Rheolau Uwch)   /  Auto Ychwanegu Cyfarchiad   /  Rhannwch E-byst Aml-Dderbynnydd yn Negeseuon Unigol yn Awtomatig ...

📨 Rheoli E-bost: Dwyn i gof E-byst yn Hawdd  /  Rhwystro E-byst Sgam gan Bynciau ac Eraill  /  Dileu E-byst Dyblyg  /  Chwilio Manwl  /  Cydgrynhoi Ffolderi ...

📁 Ymlyniadau ProArbed Swp  /  Swp Datgysylltu  /  Cywasgu Swp  /  Auto Achub   /  Datgysylltiad Auto  /  Cywasgiad Auto ...

🌟 Rhyngwyneb Hud: 😊Mwy o Emojis Pretty a Cŵl   /  Rhowch hwb i'ch Cynhyrchiant Outlook gyda Golygfeydd Tabbed  /  Lleihau Outlook Yn lle Cau ...

???? Rhyfeddodau un clic: Ateb Pawb ag Ymlyniadau Dod i Mewn  /   E-byst Gwrth-Gwe-rwydo  /  🕘Dangos Parth Amser yr Anfonwr ...

👩🏼‍🤝‍👩🏻 Cysylltiadau a Chalendr: Swp Ychwanegu Cysylltiadau O E-byst Dethol  /  Rhannwch Grŵp Cyswllt i Grwpiau Unigol  /  Dileu Atgoffa Pen-blwydd ...

Dros Nodweddion 100 Aros Eich Archwiliad! Cliciwch Yma i Ddarganfod Mwy.

 

 

Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Ótimo código!
Mas como faço para, em vez de aceitar os convites automaticamente e os encamilha-los, encaminhar para outro e-mail apenas os que eu aceitei (os que eu não aceitar ele ignora)?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations