Share via


TextRange.BoundTop-Eigenschaft (PowerPoint)

Gibt den Abstand (in Punkt) vom oberen Rand des Text-Begrenzungsrechtecks im angegebenen Textrahmen zum oberen Rand der Folie zurück. Schreibgeschützt.

Syntax

Ausdruck. BoundTop

Ausdruck Eine Variable, die ein TextRange-Objekt darstellt.

Rückgabewert

Single

Beispiel

In diesem Beispiel wird zur ersten Folie in der aktiven Präsentation ein abgerundetes Rechteck hinzugefügt. Es besitzt die gleichen Abmessungen wie das Textbegrenzungs-Rechteck der ersten Form.

With Application.ActivePresentation.Slides(1).Shapes
    Set tr = .Item(1).TextFrame.TextRange
    Set roundRect = .AddShape(msoShapeRoundedRectangle, _
        tr.BoundLeft, tr.BoundTop, tr.BoundWidth, tr.BoundHeight)
End With

With roundRect.Fill
    .ForeColor.RGB = RGB(255, 0, 128)
    .Transparency = 0.75
End With

Siehe auch

TextRange-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.