AutoSize Property

  • Article

PpAutoSize

PpAutoSize can be one of these PpAutoSize constants.
ppAutoSizeMixed
ppAutoSizeNone
ppAutoSizeShapeToFitText

expression.AutoSize

*expression   * Required. An expression that returns one of the objects in the Applies To list.

Example

This example adjusts the size of the title bounding box on slide one to fit the title text.

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1)
    If .TextFrame.TextRange.Characters.Count < 50 Then
        .TextFrame.AutoSize = ppAutoSizeShapeToFitText
    End If
End With

Applies to | TextFrame Object