TextFrame2.AutoSize-Eigenschaft (PowerPoint)

Gibt einen Wert zurück oder legt einen Wert fest, der angibt, ob die Größe der angegebenen Form automatisch geändert und an den Text innerhalb ihrer Begrenzung angepasst wird. Lese-/Schreibzugriff.

Syntax

Ausdruck. Autosize

Ausdruck Ein Ausdruck, der ein TextFrame2-Objekt zurückgibt.

Rückgabewert

MsoAutoSize

HinwBemerkungeneise

Der Wert der AutoSize -Eigenschaft kann eine der folgenden MsoAutoSize -Konstanten sein.

msoAutoSizeMixed
msoAutoSizeNone
msoAutoSizeShapeToFitText
msoAutoSizeTextToFitShape

Beispiel

Im folgenden Beispiel wird veranschaulicht, wie die Größe des Titeltexts auf der ersten Folie an den umgebenden Textrahmen angepasst wird.

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

Siehe auch

TextFrame2-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.