Hallo,
ich bin noch recht unerfahren mit der Programmierung in Excel/VBA, habe aber bereits einige Tutorials mir angesehen und nach meinem Problem gegoogelt.
Leider ohne Erfolg :-(
Ich möchte gerne aus Excel heraus einen Outlook Termin erstellen.
Quelle:
Dim obj_Outlook, obj_Calender, obj_Appointment, obj_Window As Object
Set obj_Outlook = CreateObject("Outlook.Application")
Set obj_Calender = obj_Outlook.session.GetDefaultFolder(9)
Set obj_Appointment = obj_Calender.Items.Add(1)
Set obj_Window = obj_Outlook.ActiveWindow
With obj_Appointment
.Subject = "Betreff"
.Body = "Textkoerper"
.Location = "Ort"
.Display True
End With
Set obj_Window = Nothing
Set obj_Outlook = Nothing
Set obj_Calender = Nothing
Set obj_Appointment = Nothing
...so weit, so gut...
Aber sobald das Makro ausgeführt wird, wird Outlook blockiert.
D.h. neben dem jetzt neuen geöffneten Termin kann ich parallel kein weiteres Outlook-Element (z.B. einen anderen Termin, eine Mail) öffnen.
Erst nach dem Schließen (mit oder ohne Speichern) des Termins kann ich die anderen Outlook-Elemente wieder bearbeiten.
mfg
Matthias
O365
|