Trying to do..

With ActiveSheet.OLEObjects.Add(ClassType:=Forms.Image etc...
.Name="TmpImage"

Then
ActiveSheet.OLEObjects(TmpImage).Delete

Want to Investigate Further Other Available
ClassTypes (Sounds/Video Etc..)
What is the best way to find the ClassTypes Available
and properties etc for the Class...?

Thanx for any Info
Andrew