Calendar private appointments, an unresolved question...

Status
Not open for further replies.
A

Alberto_5015

In Outlook 2003's calendar view you can see a placeholder for a private

appointment in another person's calendar.

There is a way to retrive non-confidential information (start, end and

free/busy status) by vba or it is impossible???

Thanks in advance,

Alberto
 
A

Alan Moseley

You need to use the GetFreeBusy method of the AddressEntry object to do this.

Alan Moseley IT Consultancy

http://www.amitc.co.uk

If I have solved your problem, please click Yes below. Thanks.

"Alberto_5015" wrote:


> In Outlook 2003's calendar view you can see a placeholder for a private
> appointment in another person's calendar.

> There is a way to retrive non-confidential information (start, end and
> free/busy status) by vba or it is impossible???

> Thanks in advance,
> Alberto
 
A

Alberto_5015

Hi Alan, thanks for the hint!

I'm trying to do some experiments with the the GetFreeBusy method,

but it seems a little unpredictable...

Sometimes I got the right day and hour of an hidden appointment,

but sometime they are wrong!

And how can I find the end of the appointment???

Can anyone post a little example?

Thanks in advance,

Alberto

"Alan Moseley" wrote:


> You need to use the GetFreeBusy method of the AddressEntry object to do this.
> > Alan Moseley IT Consultancy
> http://www.amitc.co.uk

> If I have solved your problem, please click Yes below. Thanks.

> "Alberto_5015" wrote:
>
> > In Outlook 2003's calendar view you can see a placeholder for a private
> > appointment in another person's calendar.
> > There is a way to retrive non-confidential information (start, end and
> > free/busy status) by vba or it is impossible???
> > Thanks in advance,
> > Alberto
 
A

Alan Moseley

GetFreeBusy does not get the start and end times of appointments as you have

probably figured out. If a user has created an appointment in their

calendar, it will detect whether they have set the 'Show Time As' box to free

or busy. If the user has not done this then the method will not return the

information that you are expecting. Some sample code:-

Public Function GetFreeBusyOfSomeone(Person As String) As String

Dim objRecipient As Recipient

Dim objAddressEntry As AddressEntry

Dim strFreeBusy As String

Set objRecipient = Outlook.Session.CreateRecipient(Person)

objRecipient.Resolve

If objRecipient.Resolved Then

Set objAddressEntry = objRecipient.AddressEntry

strFreeBusy = objAddressEntry.GetFreeBusy(#7/7/2009#, 60)

Set objAddressEntry = Nothing

End If

Set objRecipient = Nothing

GetFreeBusyOfSomeone=strFreeBusy

End Sub

This gets a string showing Fred Bloggs free or busy status starting on the

7th July in 60 minute intervals for the next 30 days. Therefore if the first

character in the string is a 0 then the person is free from 00:00 till 01:00.

If it is a 1 then the person is marked as busy from 00:00 to 01:00, and so

on.

Alan Moseley IT Consultancy

http://www.amitc.co.uk

If I have solved your problem, please click Yes below. Thanks.

"Alberto_5015" wrote:


> Hi Alan, thanks for the hint!

> I'm trying to do some experiments with the the GetFreeBusy method,
> but it seems a little unpredictable...
> Sometimes I got the right day and hour of an hidden appointment,
> but sometime they are wrong!

> And how can I find the end of the appointment???

> Can anyone post a little example?

> Thanks in advance,
> Alberto

> "Alan Moseley" wrote:
>
> > You need to use the GetFreeBusy method of the AddressEntry object to do this.
> > > > Alan Moseley IT Consultancy
> > http://www.amitc.co.uk
> > If I have solved your problem, please click Yes below. Thanks.
> > "Alberto_5015" wrote:
> >
> > > In Outlook 2003's calendar view you can see a placeholder for a private
> > > appointment in another person's calendar.
> > > > There is a way to retrive non-confidential information (start, end and
> > > free/busy status) by vba or it is impossible???
> > > > Thanks in advance,
> > > Alberto
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
N Outlook Shared appointments automatically to Private Calendar Using Outlook 1
L Showing @live account in outlook 2013 calendar as private appointment Using Outlook 1
K Private Calendar events Using Outlook 3
M Auto-color all Calendar items based on condition: Private Using Outlook 6
J Printing Private Appointment Detail on Calendar Printing Assistance Using Outlook 0
L Duplicate calendar entries in Outlook 365 Using Outlook 2
G Stop Outlook 365 adding meetings to calendar Using Outlook 0
Christopher M Outlook 365 HELP! Calendar Craziness! Using Outlook 7
J Event/Meeting in Outlook Does Not Align with SharePoint Calendar Using Outlook 5
Commodore Slow calendar Using Outlook 0
C How to import Outlook calendar? Using Outlook 1
G Add contacts birthday to calendar Using Outlook 4
e_a_g_l_e_p_i Outlook 2021 all appointments not showing in calendar Using Outlook 2
V iCloud calendar problems, Outlook shuts down immediately Using Outlook 2
KeithJB iCloud calendar sync only works one way! Using Outlook 3
V Backup Calendar, Contacts, Tasks in an POP3 data file Using Outlook 3
O Unable to make changes to an existing Calendar entry Using Outlook 11
J VBA for outlook to compare and sync between calendar Outlook VBA and Custom Forms 1
A Meeting organizer calendar intermittently drops meeting after delegate sends invite Using Outlook 0
A Meeting organizer calendar intermittently drops meeting after delegate sends invite Exchange Server Administration 0
T Outlook 2010 Cannot edit Calendar entries in OL 2010. Using Outlook 1
M On behalf of not showing on calendar for boss Using Outlook 1
C Outlook 2016 Unable to delete Gmail IMAP calendar Using Outlook 3
A force outlook to default to MY calendar Using Outlook 3
O Carriage Return - Line Feeds - exporting Calendar events Using Outlook 0
K How to share multiple calendar items Using Outlook 1
P Calendar Day View only shows 1 all day event Using Outlook 0
Hobbes Outlook 365 Calendar spreads into second calendar Using Outlook 3
J Macro to Insert a Calendar Outlook VBA and Custom Forms 8
C Tracking Calendar Changes? Using Outlook 1
O Batch update calendar Using Outlook 3
P Outlook calendar and contacts sync problem-outlook disconnects Using Outlook.com accounts in Outlook 2
HarvMan Toggle between calendar and email in Outlook 365 Using Outlook 12
e_a_g_l_e_p_i Is it possible to transfer things from one calendar to another Using Outlook 2
M Outlook calendar is missing Using Outlook 2
A Any way to make Outlook Calendar invitations look right to Gmail/Google Calendar users? Using Outlook 3
O Calendar - Location: what happens when using my own way of entering locations Using Outlook 1
I Outlook is stuck at "Updating Calendar" Using Outlook 1
AmonRa Outlook 365 calendar - too much white space Using Outlook 0
M Cannot read the calendar Using Outlook 9
Horsepower What is best calendar practice for iMac Using Outlook 3
M Calendar greyed out Using Outlook 0
M Unable to share 2019 calendar Using Outlook 0
Fozzie Bear Accepted Zoom Invites deleting without going into Default Calendar - Office 2016 Mac Using Outlook 3
P Outlook 2013 Calendar Archiving Using Outlook 0
Fozzie Bear Sharing Birthday Calendar Using Outlook.com accounts in Outlook 3
M Calendar daily Appointments and printing Using Outlook 0
I Google Calendar <calendar-notification@google.com> appearing as a duplicate entry Using Outlook 2
L Sharing Calendar for Only Scheduling Using Outlook 2
S Excel VBA and shared calendar issue Outlook VBA and Custom Forms 3

Similar threads

Top