VBA:How to determine if a certain slide has no title object?

[An]

I'd like to know whether a certain slide's title
has been deleted in a presentation.For if there is
no title in a slide,the following code would not
work.

Title = ActivePresentation.Slides(I).Shapes.Title.TextFrame.TextRange.Text

 

[An]

This property:
ActivePresentation.Slides(1).Shapes.HasTitle
I overlooked it

 

[Brian Reilly, MVP]

Right, that would return a -1 for True and a 0 for false.
Brian Reilly, MVP