Aus EXCEL einen bestimmten Termin in Outlook finden/öffnen

Antwort erstellen

Smilies
:D :) :( :o :shock: :? 8-) :lol: :x :P :razz: :oops: :cry: :evil: :twisted: :roll: :wink: :!: :?: :idea: :arrow: :| :mrgreen: :badgrin: :doubt:
BBCode ist eingeschaltet
[img] ist eingeschaltet
[flash] ist ausgeschaltet
[url] ist eingeschaltet
Smilies sind eingeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Aus EXCEL einen bestimmten Termin in Outlook finden/öffnen

Re: Aus EXCEL einen bestimmten Termin in Outlook finden/öffn

Beitrag von DerHoepp » 23. Jun 2021, 14:13

Aaah, Crosspost im gleichen Forum! Meine Antwort steht im Excel-Forum: http://office-loesung.de/p/viewtopic.php?f=166&t=866838

Aus EXCEL einen bestimmten Termin in Outlook finden/öffnen

Beitrag von MHed » 23. Jun 2021, 13:09

Moin Experten,

habe zwei Probleme:

Aus einer EXCEL Anwendung möchte ich, ausgelöst über einen Button, einen Termin mit einem bestimmten Betreff in Outlook finden und öffnen.
Folgenden Code habe ich gefunden und möchte diesen verwenden.

Code: Alles auswählen
Sub Grafik17_Klicken()
 Dim myitems As Outlook.Items
 Dim myFolder As MAPIFolder
 Dim Betreff As String

 Betreff = "Einladung zur IKS-Tool Roll-Out-Veranstaltung für Führungskräfte"
 Set myFolder = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderCalendar) 'hier entsteht der Fehler
 Set myitems = myFolder.Items

 'Durchlaufen aller Kalendereinträge und suchen nach Einträgen die den angegebenen Betreff enthalten
 For i = myitems.Count To 1 Step -1

     If InStr(1, myitems(i).Subject, Betreff, vbTextCompare) Then
        myitems(i).Display
        Counter = Counter + 1  'Anzahl der geänderten Einträge mitzählen
     End If

 Next
End Sub



1.) Allerdings gibt er mir einen Fehler zurück und ich weiß nicht warum es dort klemmt?

Der Fehler lautet:

Laufzeitfehler 438
Objekt unterstützt diese Eigenschaft oder Methode nicht

2.) Um den Termin zu öffnen, kann ich diesen Code verwenden: myitems(i).Display oder muss es anders programmiert werden?

Für Eure Unterstützung wäre ich sehr dankbar, ich weiß das Ihr es lösen könnt. :)

Nach oben

cron