Guten Morgen zusammen,
ich möchte einige Termine von aus einer Excel Tabelle in meinen Outlook Kalender exportieren und habe dafür auch schon ein Makro gefunden (siehe Auszug unten).
Die Termine sollen allerdings in meinem Kalender nicht als "gebucht", sondern als "frei" angezeigt werden. Kann mir jemand sagen welchen Befehl ich dafür in das Makro einfügen muss?
Danke vorab
Daniel
With apptOutApp
.Start = Format(ActiveCell.Value, "dd.mm.yyyy") & " " & Format(ActiveCell.Offset(0, 1).Value, "hh:mm")
.Subject = ActiveCell.Offset(0, 2).Value
.Body = ActiveCell.Offset(0, 6).Value
.Location = ActiveCell.Offset(0, 3).Value
.Duration = ActiveCell.Offset(0, 4).Value
.ReminderMinutesBeforeStart = ActiveCell.Offset(0, 5).Value
.ReminderPlaySound = False
.ReminderSet = True
.Save
End With