SelectedShapesCollection.Add Method