Delete with Selection:

MySelection.Clear
MySelection.Add MyElement
MySelection.Delete

Delete with DeleteObjectForDatum:

Set Ref = MyPart.CreateReferenceFromObject(MyElement)
MyHybShapeFactory.DeleteObjectForDatum MyElement