Meeting-Termin per Excel VBA erstellen

Hallo zusammen,

ich möchte aus Excel heraus einen Meeting Termin im Outlook Kalender erstellen.
Bei den Vereisen habe ich auf die "Microsoft Outlook 16.0" Bibliothek verwiesen.

Hier ist meine Test-Code.

Sub TerminErstellen()

    Dim myItem As Outlook.AppointmentItem, myRecipient As Outlook.Recipient
    Set myItem = Outlook.CreateItem(olAppointmentItem)
    myItem.MeetingStatus = olMeeting

    Set myRecipient = myItem.Recipients.Add("Test")

End Sub