Propiedad TextFrame2.AutoSize (PowerPoint)

Devuelve o establece un valor que indica si el tamaño de la forma especificada se ajusta automáticamente a los límites. Lectura y escritura.

Sintaxis

expresión. AutoSize

Expresión Expresión que devuelve un objeto TextFrame2 .

Valor devuelto

MsoAutoSize

Comentarios

El valor de la propiedad AutoSize puede ser una de las siguientes constantes MsoAutoSize.

msoAutoSizeMixed
msoAutoSizeNone
msoAutoSizeShapeToFitText
msoAutoSizeTextToFitShape

Ejemplo:

En el siguiente ejemplo, se muestra cómo ajustar el tamaño del texto del título en la diapositiva uno en el marco de texto que lo contiene.

Public Sub AutoSize_Example()



    Dim pptSlide As Slide

    Set pptSlide = ActivePresentation.Slides(1)

    With pptSlide.Shapes(1)

        If .TextFrame2.TextRange.Characters.Count < 50 Then

            .TextFrame2.AutoSize = msoAutoSizeTextToFitShape

        End If

    End With

    

End Sub

Consulte también

Objeto TextFrame2

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.