Thema Datum  Von Nutzer Rating
Antwort
Rot Outlook Kalendergruppen VBA
10.12.2024 17:12:47 GTA
Solved

Ansicht des Beitrags:
Von:
GTA
Datum:
10.12.2024 17:12:47
Views:
303
Rating: Antwort:
 Nein
Thema:
Outlook Kalendergruppen VBA

Hallo liebe VBAler

Kann mir jemand auf die Sprünge helfen:

Meine Strukur sieht wie folgt aus:

1
2
3
4
5
6
7
8
9
  Meine Kalender Kalender(mein Kalender)
Gruppe
  Person 1 
  Person 2
  Person 3
Freigegebene Kalender
  Person 1
  Person 2
  Person 3

Wie kann ich nun auf die Kalender der einzelnen Personen in der Gruppe "Gruppe" und "Freigegebene Kalender zugreifen? Und ja ich möchte nur Elemente auslesen und sich nicht verändern. 

1
2
3
4
5
6
7
8
9
10
11
12
13
   Dim olApp As Outlook.Application
   Dim olNamespace As Outlook.NameSpace
   Dim olMyCalendar As Outlook.folder
 Set olApp = Outlook.Application
   Set olNamespace = olApp.GetNamespace("MAPI")
   Set sharedCalendars = New Collection  
Dim groupFolder As Outlook.folder
   For Each groupFolder In olNamespace.Folders("Gruppe").Folders
       If groupFolder.DefaultItemType = olAppointmentItem Then
           excelWS.Cells(currentRow, 1).Value = "Gruppe- " & groupFolder.Name
           currentRow = currentRow + 1
       End If
   Next

Vielen Dank im Voraus.


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Outlook Kalendergruppen VBA
10.12.2024 17:12:47 GTA
Solved