View Single Post
  #2  
Old September 30th 06, 07:57 AM posted to microsoft.public.outlook.program_vba
Michael Bauer [MVP - Outlook]
external usenet poster
 
Posts: 1,885
Default Outlook Appointments

Am Fri, 29 Sep 2006 21:27:54 -0400 schrieb DENNIS BROWN:

This sample shows how to get all appointments of a specific day:
http://www.vboffice.net/sample.html?...3&cmd=showitem

Call it like this:

Dim Result as Outlook.Items
Dim Count as Long

Count=AppointmentsAtDay(Date, Result)
If Count 0 Then
...
Endif

You can then loop through the Result collection and read each objects
properties.

To get the selected day you need a workaround: Create an AppointmentItem and
read its Start property.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --


Hi,
I need to read all the appointments for the currently focused day into

variables for use in a 3rd party adaptive-access application.
Where would I find examples of doing this?
What I need to do is retrieve the appointment properties for each

appointment within the current day the user has focused on within the Day
View of their calendar.
I just need to retrieve the data, not set it, so any code examples of how

to retrieve that data would be greatly appreciated!
Ads