Thema Datum  Von Nutzer Rating
Antwort
Rot Nicht alle Kalendereinträge werden gefunden
02.06.2022 08:43:45 Oxime
NotSolved
02.06.2022 14:30:16 Gast98654
NotSolved
02.06.2022 16:40:03 ralf_b
NotSolved
02.06.2022 19:22:14 Oxime
NotSolved
02.06.2022 21:28:41 Gast94849
NotSolved

Ansicht des Beitrags:
Von:
Oxime
Datum:
02.06.2022 08:43:45
Views:
142
Rating: Antwort:
  Ja
Thema:
Nicht alle Kalendereinträge werden gefunden

Hallo zusammen

in meinem Code werden nicht alle Kalendereinträge gefunden. Problem ist, das nur die Einträge gefunden werden bis vor 2 Wochen. 
Quasie heute - 2 Wochen. Hat da jemen eine Idee was das Problem sein könnte?

Public Sub SetEventSettings()
    Dim Appt As Object
    Dim Items As Object
    
    Set Items = Session.GetDefaultFolder(olFolderCalendar).Items
    
    For Each Appt In Items
        On Error Resume Next
        Select Case Appt.Subject
            Case "Lernzeit", "Nachrichten abarbeiten", "Preparation time for", "Machen Sie eine Pause"
                With Appt
                    .Categories = "Viva"
                    .ReminderSet = False
                    .Sensitivity = olPrivate
                    .Save
                End With
        End Select
    Next
    
    Set Items = Nothing
    Set Appt = Nothing
End Sub

 


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 Nicht alle Kalendereinträge werden gefunden
02.06.2022 08:43:45 Oxime
NotSolved
02.06.2022 14:30:16 Gast98654
NotSolved
02.06.2022 16:40:03 ralf_b
NotSolved
02.06.2022 19:22:14 Oxime
NotSolved
02.06.2022 21:28:41 Gast94849
NotSolved