VBA To Change AppointmentItem.BusyStatus From MeetingItem Before Send

Status
Not open for further replies.

PGSystemTester

New Member
Outlook version
Outlook 2019 32-bit
Email Account
Exchange Server
Hello. I just found this site, thanks to whoever is behind it. Great resource.

I'm somewhat new to Outlook VBA. My specific business case is to build a macro that replies and marks calendar invites with various set properties. I'm having a hard time with the getting the AppointmentItem properties adjusted such as busyStatus.

Based on research on this helpful post on slipstick, I think I am successfully pulling the AppointmentItem from the MeetingItem. However, after I send the response, I do not see my changes to the appointment on my calendar.

According to Microsoft documentation, the AppointmentItem is copied after a send event, so I would presume that any changes I make to the AppointmentItem before the send should be duplicated after the send.

Here's my code.

Code:
Sub ReplyAndFlagaMEETING(oRequest As MeetingItem)
    
    Dim oAppt As AppointmentItem
    
    'This grabs the Appointment fro this meetingItem... right?
    Set oAppt = oRequest.GetAssociatedAppointment(True)
    
    '???!?  This part is not reflected on calendar after the send.... ?
    oAppt.BusyStatus = olFree
    
    Dim oResponse
    Set oResponse = oAppt.Respond(olMeetingAccepted, True)
    oResponse.Send

End Sub

Anyone know what I'm doing wrong? Thank you!
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
J VBA Cannot programmatically input or change Value for User Defined field Using Outlook 1
A Change settings Send/receive VBA Outlook VBA and Custom Forms 0
E Outlook VBA change GetDefaultFolder dynamically Outlook VBA and Custom Forms 6
N Help creating a VBA macro with conditional formatting to change the font color of all external emails to red Outlook VBA and Custom Forms 5
diver864 vba for a rule to automatically accept meeting requests with 'vacation' in subject, change to all-day event, change to free, don't send reply Outlook VBA and Custom Forms 1
B Change Font and Font size using VBA Outlook VBA and Custom Forms 9
S Change VBA script to send HTML email instead of text Outlook VBA and Custom Forms 3
A Edit subject - and change conversationTopic - using VBA and redemption Outlook VBA and Custom Forms 2
S Example VBA Macro - To Conditionally Change the From Account and Add a BCC Address on Emails Outlook VBA and Custom Forms 11
M VBA to change flag status in outlook contact item Outlook VBA and Custom Forms 3
H Change Default Email Account Using VBA Outlook VBA and Custom Forms 5
O VBA to Run Font Change on Outlook Startup Outlook VBA and Custom Forms 4
D Change sender name outlook vba 2010 Custom Userform Outlook VBA and Custom Forms 1
O VBA to change message format and add formatted signature Outlook VBA and Custom Forms 1
F VBA Code to change subject Like Outlook VBA and Custom Forms 3
K Outlook 2013 - Use VBA to change Due date of Tasks Using Outlook 3
K How to change status of a mail marked as a task (VBA) Outlook VBA and Custom Forms 2
J Outlook Rules VBA Run a Script - Multiple Rules Outlook VBA and Custom Forms 0
C Outlook (desktop app for Microsoft365) restarts every time I save my VBA? Using Outlook 0
D VBA Macro to Print and Save email to network location Outlook VBA and Custom Forms 1
TedSch Small vba to kill political email Outlook VBA and Custom Forms 3
E Outlook 365 Outlook/VBA Outlook VBA and Custom Forms 11
N VBA Macro To Save Emails Outlook VBA and Custom Forms 1
Z VBA Forward vs manual forward Outlook VBA and Custom Forms 2
J VBA for outlook to compare and sync between calendar Outlook VBA and Custom Forms 1
A Any way to force sort by/group by on search results with VBA? Outlook VBA and Custom Forms 1
E Default shape via VBA Outlook VBA and Custom Forms 4
Z Import Tasks from Access Using VBA including User Defined Fields Outlook VBA and Custom Forms 0
justicefriends How to set a flag to follow up using VBA - for addressee in TO field Outlook VBA and Custom Forms 11
M add new attendee to existing meetings with VBA Outlook VBA and Custom Forms 5
D VBA code to select a signature from the signatures list Outlook VBA and Custom Forms 3
D Create advanced search (email) via VBA with LONG QUERY (>1024 char) Outlook VBA and Custom Forms 2
David McKay VBA to manually forward using odd options Outlook VBA and Custom Forms 1
FryW Need help modifying a VBA script for in coming emails to auto set custom reminder time Outlook VBA and Custom Forms 0
S vba outlook search string with special characters Outlook VBA and Custom Forms 1
S VBA search string with special characters Outlook VBA and Custom Forms 1
U Outlook 2019 VBA run-time error 424 Outlook VBA and Custom Forms 2
DDB VBA to Auto Insert Date and Time in the signature Outlook VBA and Custom Forms 2
F VBA to move email from Non Default folder to Sub folders as per details given in excel file Outlook VBA and Custom Forms 11
G VBA to save selected Outlook msg with new name in selected network Windows folder Outlook VBA and Custom Forms 1
F Excel VBA to move mails for outlook 365 on secondary mail account Outlook VBA and Custom Forms 1
B Zoom automatically next email item (VBA) Outlook VBA and Custom Forms 2
T vba extract data from msg file as attachment file of mail message Outlook VBA and Custom Forms 1
K Outlook Office 365 VBA download attachment Outlook VBA and Custom Forms 2
A VBA Script - Print Date between first email in Category X and last email in Category Y Outlook VBA and Custom Forms 3
N Save selected messages VBA does not save replies and/or messages that contain : in subject Outlook VBA and Custom Forms 1
Y Filter unread emails in a search folder vba help Outlook VBA and Custom Forms 0
V vBA for searching a cell's contents in Outlook and retrieving the subject line Outlook VBA and Custom Forms 1
B vBA for exporting excel file from outlook 2016 Outlook VBA and Custom Forms 3
L Modifying VBA script to delay running macro Outlook VBA and Custom Forms 3

Similar threads

Top