Finding Out Whether a Shape Has a Text Frame : Slide Shape « PowerPoint « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. PowerPoint
  3. Slide Shape

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








Related examples in the same category

1.add a bent-up arrow to the upper-right corner of the penultimate slide in the active presentation:
2.Deleting a Shape
3.Selecting All Shapes
4.Repositioning and Resizing a Shape
5.Works with the first shape on the third slide of the presentation, moving it 100 points to the left and 200 points down, and rotating it 90 degrees counterclockwise:
6.Copying Formatting from One Shape to Another
7.Setting an Animation for a Shape or a Range of Shapes