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
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