Hallo allerseits,
ich habe im Firmennetzwerk (SBS2011 mit Exchange 2010) einen öffentlichen Ordner ("KS-Projekte") vom Typ "Aufgaben".
Dieser Ordner ist im Outlook-Bereich "Aufgaben" in den Favoriten ("Meine Aufgaben") als "Projekte" sichtbar.
Nun möchte ich in der Ribbon-Leiste des Outlook-Bereichs "E-Mail" eine Schaltfläche haben,
mit deren Hilfe ich in den Bereich "Aufgaben", in den Favoritenordner "Projekte" wechseln kann.
Ich habe bereits realisiert, dass ich mit dem Button in den angesprochenen Öffentlichen Ordner "KS-Projekte" komme:
Private Sub btnKSPrj_Click_1(sender As Object, e As RibbonControlEventArgs) Handles btnKSPrj.Click
Dim myolApp As Outlook.Application
Dim myNamespace As Outlook.NameSpace
myolApp = CreateObject("Outlook.Application")
myNamespace = myolApp.GetNamespace("MAPI")
myolApp.ActiveExplorer.CurrentFolder = myNamespace.GetDefaultFolder(OlDefaultFolders.olPublicFoldersAllPublicFolders).Folders("KS-Projekte")
End Subaber dann bekomme ich in der linken Navigationsleiste die Ansicht des Outlook-Bereichs "Ordner" angezeigt.
Ich möchte aber nicht in den Outlook-Bereich "Ordner" wechseln sondern in den Outlook-Bereich "Aufgaben";
und dort den unter Favoriten angezeigten Ordner "Projekte" öffnen.
Ich hoffe meine Problemschilderung ist nachvollziehbar und jemand von euch kann mir dabei helfen.
Gruß, Andreas.
|