A
AKJTR
I found this bit of code and at works great when i loop through a list of
shared calendars BUT it creates a new instance of outlook for each calendar.
IS there a way to show all calendars in one outlook window?
tia
Set myRecipient = myNamespace.CreateRecipient(strName(x))
myRecipient.Resolve
If myRecipient.Resolved Then
Set CalendarFolder = _
myNamespace.GetSharedDefaultFolder _
(myRecipient, 9)
CalendarFolder.Display
End If
Next x
shared calendars BUT it creates a new instance of outlook for each calendar.
IS there a way to show all calendars in one outlook window?
tia
Set myRecipient = myNamespace.CreateRecipient(strName(x))
myRecipient.Resolve
If myRecipient.Resolved Then
Set CalendarFolder = _
myNamespace.GetSharedDefaultFolder _
(myRecipient, 9)
CalendarFolder.Display
End If
Next x