Nota
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
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 .
Observaciones
El valor de la propiedad AutoSize puede ser una de las siguientes constantes MsoAutoSize :
- msoAutoSizeMixed
- msoAutoSizeNone
- msoAutoSizeShapeToFitText
- msoAutoSizeTextToFitShape
Ejemplo
El siguiente código muestra cómo ajustar el tamaño del texto del título en la diapositiva uno en el marco de texto que lo contiene.
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
Vea también
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.