mail schliessen per vba

Forumthread: mail schliessen per vba
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: mail schliessen per vba

09.11.2020 12:13:55

Rolf

Liebe Forummitglieder
ich habe wiederum ein Problem wo ihr mir sicherlich helfen könnt.
Mit folgendem code öffne ich eine outlookdatei

Public Sub msgDateiÖffnen(ByVal pfadneuunddatei As String)
Dim objApp As Object   'Outlook.Application
Dim objItem As Object  'Outlook.MailItem
Set objApp = CreateObject("Outlook.Application")
Set objItem = objApp.Session.OpenSharedItem(pfadneuunddatei)
objItem.Display
Set objApp = Nothing
Set objItem = Nothing
End Sub

Nun möchte ich die Datei aber auch wieder schliessen.
Wie stelle ich das an?
Ist für euch vermutlich trivial aber ich komm hier nicht weiter.
Vielen Dank für eure Hilfe.
Gruss Rolf

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: mail schliessen per vba

09.11.2020 12:41:08

Firmus
AW: mail schliessen per vba

09.11.2020 17:12:58

Rolf

AW: mail schliessen per vba

09.11.2020 12:41:08

Firmus

Hi Rolf,
google: vba outlook mail schließen
Ergebnis: https://docs.microsoft.com/de-de/office/vba/api/outlook.mailitem.close(method)
Getestet:

  Set obj = Application.ActiveWindow
If TypeOf obj Is Outlook.Inspector Then
Set obj = obj.CurrentItem
Else
Set obj = obj.Selection(1)
End If
obj.Close olSave

Funktioniert bei mir. Outlook2013.
Gruß,
Firmus

AW: mail schliessen per vba

09.11.2020 17:12:58

Rolf

Hallo Firmus
Danke für die Info. Werde es demnächst ausprobieren.
Gruss Rolf