Wenn Sie aus einer anderen Office-Anwendung heraus auf Outlook zugreifen möchten, müssen Sie im ersten Schritt für eine Verknüpfung zwischen beiden Anwendungsprogrammen sorgen.

Dazu legen Sie ein Objekt an, das auf die Outlook-Anwendung weist. Die folgenden Programmzeilen erledigen diese Aufgabe:

 
Dim oOL As Object

 
Set oOL = CreateObject("Outlook.Application")

 
 
Nach diesem Vorgang weist die Variable "oOL" auf das Objekt "Outlook". Innerhalb von Outlook werden die Informationen in einzelnen Namensbereichen verwaltet. Diese Namensbereiche enthalten Ordner, die den einzelnen Bereichen von Outlook entsprechen. Ein Ordner ist für Kontakte zuständig, einer für eingehende Mails, einer für Aufgaben usw.

Wenn Sie auf den Kalender von Outlook zugreifen möchten, erledigen Sie das über den Ordner "olFolderCalender" - diese interne Konstante besitzt den Wert 9.

Damit Sie auf Termine aus dem Outlook-Kalender zugreifen können (zum Auslesen von bestehenden Terminen oder zum Anlegen von neuen Terminen), verknüpfen Sie eine Objektvariable mit diesem Outlook-Ordner. Der folgende Programmcode zeigt, wie es aussieht, wenn Sie auf den Outlook-Kalender über die Variable "MeineTermine" zugreifen möchten:

 
Dim myNamespace as Object

 
Dim MeineTermine as Object

 
Set myNamespace = oOL.GetNamespace("MAPI")

 
Set MeineTermine = myNamespace.GetDefaultFolder(9).items

 
 
Diesen Programmcode können Sie erst ausführen, wenn Sie der Variablen "oOL" den Bezug auf die Outlook-Anwendung zugewiesen haben - wie weiter oben beschrieben.
Nach diesem Vorgang können Sie über die Objektvariable "MeineTermine" auf die einzelnen Elemente Ihres Outlook-Kalenders zugreifen.

Weiter geht es mit:

Outlook-Kalender auslesen und Termine anlegen: Auf Kalendereinträge zugreifen