Clever-Excel-Forum

Hallo,

ich habe ein Makro, dass mir meine Termine in den Kalender von Outlook einträgt.

Mit der Variablen:

Set objCal = ObjOL.Session.GetDefaultFolder(9)

Ich habe noch einen freigegebenen Ordner ("Alle Mitarbeiter"), wie bekomme ich etwas in den Kalender eingetragen?
Es handelt sich um ein "[email=MaxMustermann@FirmaGoldgelb]MaxMustermann@FirmaGoldgelb[/email]" Postfach.

Ich vermute, dass ich irgendwie mit GetSharedFolder arbeiten müsste, komme aber nicht auf die Lösung.

Kann mir jemand einen Tipp geben?

Viele Grüße
Andreas

Code:
    '*** skizziere wie folgt:

    Dim oModule        As Object             'das Modul referenzieren

    Dim olNavGrps      As NavigationGroups   'dessen Auflistung

    Dim olNavGrp       As NavigationGroup    'dessen Items -> bspw der Kalender

    '*** der Weg dahin

    Set oModule = Application.ActiveExplorer.NavigationPane.Modules("Kalender")

    Set olNavGrps = oModule.NavigationGroups

    Set olNavGrp = olNavGrps("Alle Mitarbeiter")

Vielen Dank,

habe es mit deiner Hilfe hinbekommen!

Viele Grüße
Andreas

ari-2001

Mase

ari-2001