1
我一直在使用vba的Outlook的小项目。最终目标是与两位收件人设置约会/会面,并将其设置为整天。那么,我需要它在我的日历中找到我的会议,并将其设置为不是一整天的事件。展望VBA会议调整
我已经到了可以将会议发送给收件人的地步,并且可以根据需要显示。唯一的障碍是让我的代码按日期和时间找到相同的会议(与发送时相同),并将其从全天事件更改为不是全天事件。到目前为止,这是我的代码,可以用于我目前需要的功能。
Sub Appointment()
Dim olApt As AppointmentItem
Set olApp = Outlook.Application
Set olApt = olApp.CreateItem(olAppointmentItem)
With olApt
.Start = #3/10/2017 4:00:00 PM#
.End = #3/3/1017 5:00:00 PM#
.MeetingStatus = olMeeting
.AllDayEvent = True
.Subject = "OOO - Test"
.Body = "Testing Stuff"
.BusyStatus = olFree
.ReminderSet = False
.RequiredAttendees = "Placeholder" & ";" & " Placeholder"
.Save
.Send
End With
Set olApt = Nothing
Set olApp = Nothing
End Sub