Mega Code Archive

 

Categories / VisualBasic Script / Powerpoint

 

Finding Out Whether a Shape Has a Text Frame

Sub shape()     If ActivePresentation.Slides(1).Shapes(1).HasTextFrame = msoTrue Then         MsgBox "The shape contains a text frame."     End If End Sub