Checking shape on worksheet

Hi All,


I am trying to check the existence of shape on worksheet. It working fine when the shape found.
However, if the shape not there it will return error instead of exit sub.

Please Login or Register  to view this content.

would appreciate if anyone could help me.

PHP Code: 

Function ExistShape(S, Optional Ws As Worksheet) As Boolean
         If Ws Is Nothing Then Set Ws = ActiveSheet
         On Error Resume Next
         ExistShape = IsObject(Ws.Shapes(S))
End Function 


Do you like it ? So thanks to click on bottom left star icon « Add Reputation » !

you may use NOT, try this

Please Login or Register  to view this content.