DeleteText Method Example

If shape two on myDocument contains text, this example deletes the text.

Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes(2).TextFrame.DeleteText