Hallo zusammen,

ich möchte gerne mehrere Outlook Kalender (Exchange Server) jeweils in einem neuen Fenser mit VBA öffnen.



Bisher habe ich folgendes.

<pre>
<font face="courier new" size="2pt">
<font color="#000000"></font><font color="#0000AA">Dim</font><font color="#000000"> meineOlApp </font><font color="#0000AA">As</font><font color="#000000"> Outlook.Application</font>
<font color="#000000"></font><font color="#0000AA">Dim</font><font color="#000000"> olNameSpace </font><font color="#0000AA">As</font><font color="#000000"> NameSpace</font>
<font color="#000000"></font><font color="#0000AA">Dim</font><font color="#000000"> meinOrdner </font><font color="#0000AA">As</font><font color="#000000"> MAPIFolder</font>
<font color="#000000"></font>
<font color="#000000"></font><font color="#0000AA">Set</font><font color="#000000"> meineOlApp = CreateObject("Outlook.Application")</font>
<font color="#000000"></font><font color="#0000AA">Set</font><font color="#000000"> olNameSpace = meineOlApp.GetNamespace("MAPI")</font>
<font color="#000000"></font><font color="#0000AA">Set</font><font color="#000000"> meinOrdner = olNameSpace.GetDefaultFolder(olFolderCalendar)</font>
<font color="#000000">meinOrdner.Display</font>
<font color="#000000"></font>
<font color="#000000"></font>
</font>
</pre>

Das öffnet aber nur meinen eigenen Kalender. Hat jemand einen Tip für mich?


Frank

Hi,

@palvoelgyi

schau Dir mal den Code an, den ich in folgendem Thread gepostet habe:

vb-paradise.de/index.php?page=Thread&threadID=1307


bye...

LaMa5.