Hi there!

with much help of this forum i got the following macro running:


Public Sub SchalteKalender()
Set objnameSpace = Application.GetNamespace("MAPI")
Set objRoomA = objnameSpace.CreateRecipient("Foreign Name")
objRoomA.Resolve
Set objRoomACalendar =
objnameSpace.GetSharedDefaultFolder(objRoomA, olFolderCalendar)
Set Application.ActiveExplorer.CurrentFolder = objRoomACalendar
Set objRoomATasks = Nothing
Set objRoomACalendar = Nothing
Set objRoomA = Nothing
End Sub

It opens a foreign calender and shows it. now my problem is: i dont
want to see my own calender/tasks. how can i just sho a specific
calender and its tasks and leave all other at that moment showed ones
out?

Is this Outlook 2003? Do you mean that you want to show only the other's users calendar without displaying it side-by-side with your own calendar?

--
Sue Mosher, Outlook MVP
Author of
Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx


"sven preuske" <(E-Mail Removed)> wrote in message news:(E-Mail Removed)...
> Hi there!
>
> with much help of this forum i got the following macro running:
>
>
> Public Sub SchalteKalender()
> Set objnameSpace = Application.GetNamespace("MAPI")
> Set objRoomA = objnameSpace.CreateRecipient("Foreign Name")
> objRoomA.Resolve
> Set objRoomACalendar =
> objnameSpace.GetSharedDefaultFolder(objRoomA, olFolderCalendar)
> Set Application.ActiveExplorer.CurrentFolder = objRoomACalendar
> Set objRoomATasks = Nothing
> Set objRoomACalendar = Nothing
> Set objRoomA = Nothing
> End Sub
>
> It opens a foreign calender and shows it. now my problem is: i dont
> want to see my own calender/tasks. how can i just sho a specific
> calender and its tasks and leave all other at that moment showed ones
> out?
>

Yes.. i think i found a way by using DeselectFolder .. now ive got
another problem: my script only works, when running in the
calender-view. is there a simple way to switch from tasks or contacts
to calender-view?

I don't know what you mean. If you set ActiveExplorer.CurrentFolder to a calendar folder, it will show that folder. If that's not working, show a code snippet that illustrates the problem.

--
Sue Mosher, Outlook MVP
Author of
Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx


"sven preuske" <(E-Mail Removed)> wrote in message news:(E-Mail Removed)...
> Yes.. i think i found a way by using DeselectFolder .. now ive got
> another problem: my script only works, when running in the
> calender-view. is there a simple way to switch from tasks or contacts
> to calender-view?
>