Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Westi on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Sending Outlook Appts. w/o scheduling in sender's Calendar

Status
Not open for further replies.

sqleptical

Programmer
Sep 26, 2001
112
US
I'm using VBA to send appointments to recipients through Outlook (from an Access form). The problem is that the appointments being sent are also written into the sender's calendar, eventually clogging up the calendars for the clerical worker - forcing them to go in & clear out their appointments at least once per month.

Is there a way to call an olAppointmentItem object that is not associated with the current user's Outlook or any other way to avoid writing each appointment to the sender's calendar?

Thanks!
 
Create a public calendar and make it active before sending the appointments.
 
Create a public calendar and make it active before sending the appointments."

Thanks mintjulep. Do you mean to create a public calendar from within the VB code everytime the the macro is run?

I'm thinking now, it may be easier/faster to just delete the appointment after it was sent. If I could find a way to reference the appt Subject by value, there should be a way to delete the appointment that was just created in the Sender's calendar. I'm trying some code from the MSDN site, but have not gotten it to work yet.

If anyone, knows, please post your solution, otherwise I'll post waht I find after I get something to work.
 
Sorry, I actually thought about that as I was hitting POST.

I meant manually create a public calendar one time. THEN each time your VB creates an appointment have your code make that the active calendar and create the appointment.
 
Thanks again, but I was able to find two lines of code that needed to be added right after the appointment was sent. This removed it from the senders calendar altogether:

objAppointment.MeetingStatus = olMeetingCanceled
objAppointment.Delete
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top