Outlook Appointments > how do I delete or update

[Barsoom]

I Know how to make an outlook appointment:

Sub MakeAppt()


Dim olApp As Outlook.Application
Dim olApt As AppointmentItem


Set olApp = New Outlook.Application
Set olApt = olApp.CreateItem(olAppointmentItem)


With olApt
.RequiredAttendees = Range("B2")
.Subject = Range("B3")
.Location = Range("B4")
.Start = Range("B5") + Range("D5")
.End = Range("B6") + Range("D6")
.Categories = Range("E6")
.Body = Range("A8")
.MeetingStatus = 1
.BusyStatus = olBusy
'.Send
.Save
End With


Set olApt = Nothing
Set olApp = Nothing

MsgBox "Appointment Made", vbInformation, "Appointment Made"


End Sub
##############

How do I delete an appointment based on its
1. Subject
2. Start Date

Also How do I Update or Amend an appointment by searching for its
1. Subject
2. Start Date
and updating absolutely everything else