HybridShapeExistsInHybridBody

From scripting
Jump to: navigation, search
Function HybridShapeExistsInHybridBody(InputStr As String, CurSet as HybridBody) As Boolean
On Error GoTo blast
Set HHH = CurSet.HybridShapes.Item(InputStr)
HybridShapeExists = True
Exit Function
blast:
HybridShapeExists = False
End Function